ࡱ> Root Entry1iapcE51iThe VBA Project E51i_VBA_Project E51i" !%B'(;<=>?@ANDEFGHIJKLMORoot Entry sKapcE5 sKThe VBA Project E5 sK_VBA_Project E5 sK  "  9#%$)B*+,-/012345678Host Project Item Names0 5 sKVBA Project Data"Host Project Items&4VBA Project Signature, 2  "#$%&'()*+,-./0BDEFGHIJK{ OThisLibrary*{O5{AL{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{0B L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{B";{C$={@D&&L{801A0000-A66C-11D3-A8BD-0000861EBBD6}1bQ:\solidworks\sw2007\macros\RebuID="{B24E3CA6-9E78-4184-9878-22A20C3A065D}" Document=ThisLibrary/&H00000000 Module=RebuildAllConfigs1 Name="RebuildAllConfigs" HelpContextID="0" VersionCompatible32="393222000" CMG="0B09CAFFFB03FB03FB03FB03" DPB="4042810282028202" GC="7577B40DDC43DD43DDBC" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLibrary=0, 0, 0, 0, C RebuildAllConfigs1=22, 22, 966, 732, Z 732, Z u BExposeTemplate`DerivBustomizD2Rebuild3 #\ildAllConfigs.swpR\sw2007\pr6@s\SolidWorks\swconst.t,lidWorks 2007 Constant type0* pHdRebuildAllConfigDsP@ b H J J< 9s@tdole>stdol@e h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\systemThisLibrary5 sKProject_Data_CurVer( 4 Host Project Item List Data83VBA55PROJECTwm_PROJECT _VBA_PROJECT*ThisLibrary!ThisLibraryThisLibraryRebuildAllConfigs1RebuildAllConfigs1JrU t  ܭHJ J< 9s@tdole>stdol@e h0* pHdRebuildAllConfigDsP@  =  H!J J< 9s@tdole>stdol@e h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\systemReqControl List Data*6 Control_Data_CurVer(5 Control List Data$1(RebuildAllConfigs1&."__SRP_2C__SRP_3Ao<__SRP_1FdirProject Item Data$ Control List Data$ sK sKReqControl List Data* sK sK32\e2.tlb#OLE AutomatioFn0SldWorks>CdWGrksH H83A33D31-27C5-11CE-BFD4H400513BB57}#fH\\srvlicman01\programme\sw2007 files\SoliC\sld.wG[N  Type LibraryH Swst>BwC_nu^t_ a_4687F359-55D0-4CD3-B6CF-2EB42C11F989/wcon?@BDEFGHIJKMNOPQRSTUVWXYZ[{ CThisLibrary*{C5{DL{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{0E L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{F";{0I$={L&&L{801A0000-A66C-11D3-A8BD-0000861EBBD6}1bQ:\solidworks\sw2007\macros\RebuID="{B24E3CA6-9E78-4184-9878-22A20C3A065D}" Document=ThisLibrary/&H00000000 Module=RebuildAllConfigs1 Name="RebuildAllConfigs" HelpContextID="0" VersionCompatible32="393222000" CMG="0002C1C7C5C7C5C7C5C7C5" DPB="EBE92A411442144214" GC="D6D4177EE982D583D5832A" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLibrary=0, 0, 0, 0, C RebuildAllConfigs1=22, 22, 966, 732, Z 732, Z EditRebuild3ForceRebuild3VBE6.DLL    #\ildAllConfigs.swpR\sw2007\pr6@s\SolidWorks\swconst.t,lidWorks 2007 Constant type0* pHdRebuildAllConfigDsP@  =  H J J< 9s@tdole>stdol@e h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\systemThisLibrary51iProject_Data_CurVer( 4 Host Project Item List Data83VBA55PROJECTwm_PROJECT _VBA_PROJECT&0ThisLibraryLThisLibraryThisLibraryRebuildAllConfigs1RebuildAllConfigs1JrU t  ܭHJ J< 9s@tdole>stdol@e hK*mrU~~~~~~~~~g  \Giȯi ReqControl List Data*^ Control_Data_CurVer(] Control List Data$\(RebuildAllConfigs1&Chdir5Project Item Data$ Control List Data$1i1iReqControl List Data*1i1i__SRP_2C__SRP_3Ao__SRP_0<__SRP_1F A    Ai ThisLibraryRebuildAllConfigs1RebuildAllConfigsF /C:\PROGRA~1\GEMEIN~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA 9 a0lA\\srvlicman01\programme\sw2007\program files\SolidWorks\swvba.tlb SolidWorks 1Y@0FC:\WINDOWS\system32\stdole2.tlbstdoleMain aP1='@WD\\srvlicman01\programme\sw2007\program files\SolidWorks\sldworks.tlbSldWorks a!`YFUL.,C\\srvlicman01\programme\sw2007\program files\SolidWorks\swconst.tlbSwConst Qp ?%L}N9F\\srvlicman01\programme\sw2007\program files\SolidWorks\swcommands.tlb SwCommands   (SldWorks.ApplicationActiveDoc *GetConfigurationNames ,GetActiveConfigurationName  $ShowConfiguration232\e2.tlb#OLE AutomatioFn0SldWorks>CdWGrksH H83A33D31-27C5-11CE-BFD4H400513BB57}#fH\\srvlicman01\programme\sw2007 files\SoliC\sld.wG[N  Type LibraryH Swst>BwC_nu^t_ a_4687F359-55D0-4CD3-B6CF-2EB42C11F989/wcon-`5poOe'Vc1 AscallCase.debug=DimCEachDelseHendif_IfbInthenTrue SolidWorks;VBAWin16~Win32MacVBA6#Projekt1Astdole` VBAProject3KRebuildAllConfigs ThisLibraryG _EvaluateModul1RebuildAllConfigs1swAppMain, Application*SldWorks$SwConst SwCommands AllConfigsI swDocPARTM swDocASSEMBLYn swDocDRAWINGVswCustomInfoType_e/swCustomInfoUnknownswCustomInfoText kswCustomInfoDatehswCustomInfoNumberBswCustomInfoYesOrNo.;ModelDoc  ConfigCount3 ConfigNames| PropConfigs6 CollectionW PropNames0gPropjConfigIPropType\wPropText#i` CreateObject ActiveDocڒAddrGetConfigurationCountYGetConfigurationNames/AddCustomInfo3{Rebuild2 OldConfigNameOldC ConfigManager;ConJ _B_var_SetConfigurationManagerEGetActiveConfigurationU OldCVonfig OldConfig2 _B_var_ForjLvConfigGConfigNar3Varian0~swConfigswModel[GetConfigurationByName8  vConfigNameoldcoModelDretval; ModelDoc2^ShowConfiguration2 _B_var_IfPMdgbox  _B_var_Mdgboxu@MsgBoxRvcon$+ vbCritical+}vbOKOnly RebuildFlag[Rebui _B_var_Select'E EditRebuild33 FullRebuildI ForceRebuild35 _B_var_Call_B_var_ConfigCountz$oldvco*l"$&$xME(<6 < <H``˜.B[xME(< <<<H``H˜.B% BL `@++`x `<t 0L`pL  B˜*B˜,B`@d `zP `T 8 @4 @0 @, HX(o @XxI N0 L N(  @ 8   D`   2 *( (X N 4  Jx    @   @X ` p  "   $   D hp x :    (X         ,H   ACHTUNG:PG ********************************************************************** wieder aktiviert.: Kann hilfreich sein, um bei Problemen beim Speichern alleE Makro aktiviert nacheinander alle Konfigurationen und macht optionalHG einen Rebuild dafr. Anschlieend wird die vorher aktive KonfigurationD RebuildFlag steuert, ob die Konfiguration neu durchgerechnet werdenxt ang] 26.11.2006 Stefan Berlitz, Stefan.Berlitz@solidworks.cad.deP00$ http://solidworks.cad.depp`! http://swtools.cad.deG **********************************************************************p- diese folgenden Werte knnen editiert werdenP 0 = KEIN Rebuild 1 = normales Rebuildeige 2 = Fullrebuildat! alle Konfigurationen durchlaufen p!'`d a]]]`PP <!l.pfi  @oc]  <B <B KTKT : Definitions of typenames are consistent as in swconst.bas]X]]nx Rebuild <BPSTR]]]SldWorks.Application$R. !T.< <= Call MsgBox("Keine Datei geffnet", vbOKOnly, "Information")|0k(4 alle Dateieigenschaften aus der Konfiguration holen <!Z'@o2 Konfigurationen eines Modells neu durchzurechnen. & und original Konfig wieder aktivieren ` <B = * Datei wird dadurch ggf. grer, vor allem bei vielen KonfsAttribute VB_Name = "RebuildAllConfigs1"` ' *BMakro aktiviert nacheinander alle Kxurationen und m%t op-`5poOe'Vc1 AscallCase.debug=DimCEachDelseHendif_IfbInthenTrue SolidWorks; VBAWin16~Win32MacVBA6#Projekt1A stdole` VBAProject3K RebuildAllConfigs ThisLibraryG _EvaluateModul1 RebuildAllConfigs1swApp(Main, Application*(SldWorks$ SwConst SwCommands AllConfigsI swDocPARTM swDocASSEMBLYn swDocDRAWINGVswCustomInfoType_e/swCustomInfoUnknownswCustomInfoText kswCustomInfoDatehswCustomInfoNumberBswCustomInfoYesOrNo.;ModelDoc  ConfigCount3 ConfigNames| PropConfigs6 CollectionW PropNames0gPropjConfigIPropType\wPropText#i` CreateObject ActiveDocڒAddrGetConfigurationCountYGetConfigurationNames/AddCustomInfo3{Rebuild2 OldConfigNameOldC ConfigManager;ConJ _B_var_SetConfigurationManagerEGetActiveConfigurationU OldCVonfig OldConfig2 _B_var_ForjLvConfigGConfigNar3Varian0~swConfigswModel[GetConfigurationByName8  vConfigNameoldcoModelDretval; ModelDoc2^ShowConfiguration2 _B_var_IfPMdgbox  _B_var_Mdgboxu@MsgBoxRvcon$+ vbCritical+}vbOKOnly RebuildFlag[Rebui _B_var_Select'E EditRebuild33 FullRebuildI ForceRebuild35 _B_var_Call_B_var_ConfigCountz$oldvco*l"$&$:p k t kc%t  T(H@txH0 (4LHPdtxT8k/X#xME