аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ jQњˆ%Ъ;apcџџџџџџџџАG`пT%Ъ jQњˆ%ЪThe VBA Project џџџџџџџџАG`пT%Ъ jQњˆ%Ъ_VBA_ProjectџџџџџџџџАG`пT%Ъ jQњˆ%Ъ§џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџp§џџџўџџџ "kH!%ўџџџџџџџџџџџ'|Fџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ:;<=>?@ABCDEўџџџG{JKLMfOPQRUџџџџџџџџV`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџabcdeўџџџghqjўџџџlmџџџџџџџџ&i(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџI}rџџџџџџџџRoot Entryџџџџџџџџ СSU‰%ЪCapcџџџџџџџџАG`пT%Ъ СSU‰%ЪThe VBA Project џџџџџџџџАG`пT%Ъ СSU‰%Ъ_VBA_ProjectџџџџџџџџАG`пT%Ъ СSU‰%Ъџџџџџџџџ§џџџ  „ ‹€8ўџџџ #џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‰6џџџџџџџџџџџџџџџџ*+,-./012345ўџџџ7‡џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџTWџџџџџџџџXYx[\]^_nџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџosџџџџџџџџџџџџtuvwўџџџyz…џџџџџџџџџџџџˆHost Project Item Names0џџџџ  eпT%Ъ СSU‰%ЪVBA Project Data"џџџџжHost Project Items&џџџџџџџџ4VBA Project Signature,џџџџџџџџџџџџ ўџџџўџџџ3 ўџџџCЬ !"#$%&'()*+,-./0126ўџџџ5ўџџџ789:;<=>?@ABDEFGHIJKLMNOlQRЩTUVWXYZ[\]^_`abcdefh‰jkщmnoўџџџqrstuvwxyz{|}~ƒ€Эє{аThisLibrary*{€5{0L{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{р L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{";{@$={№&šЄ&ЎL{801A0000-A66C-11D3-A8BD-0000861EBBD6}И&ТLC:\SWX-USER\Makro\KomponenteZфhlID="{44A053EC-8354-4191-BC9A-A03E9B56948F}" Document=ThisLibrary/&H00000000 Module=KomponenteZфhlen1 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=UserForm1 Name="KomponenteZфhlen" HelpContextID="0" VersionCompatible32="393222000" CMG="A2A07320C024C024C024C024" DPB="F3F122937294729472" GC="44469546B796B896B869" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLibrс.E р….`ŒM ДC:\WINDOWS\system32\FM20.DLLMSForms aa‰б sцwv–лoHКŠђЅN -C:\DOKUME~1\RKB\Len.swpЬR•О type libraryю*ThisLibraryThisLibraryKomponenteZфhlen1KomponenteZфhlen1UserForm1UserForm1200OKALE~1\Temp\VBE\MSForms.exd A ai бА !TraverseAnzahlDerKomponenteZфhlenThisLibraryџџџџџџџџ eпT%Ъ СSU‰%ЪProject_Data_CurVer( џџџџ‡ Host Project Item List Data8џџџџџџџџџџџџ†VBAџџџџџџџџАИbпT%ЪАИbпT%Ъй‚х„…ˆўџџџўџџџ˜Š‹ŒŽ‘’“”•–—ўџџџ™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЖЗИЙКЛМНўџџџПРСТУФХЦЧШЪїЫЭўџџџЮЯачвгдеўџџџзўџџџўџџџклмнопрстуфўџџџцўџџџўџџџўџџџъыьэюя№ёђѓєѕіўџџџјљњћќ§ўџPROJECTwmџџџџџџџџџџџџ4zPROJECT џџџџ 4_VBA_PROJECTџџџџџџџџџџџџ)МThisLibraryџџџџОl__SRP_0џџџџл __SRP_1џџџџџџџџџџџџэUserForm1 џџџџ @б“%Ъ YКB„%Ъfџџџџџџџџџџџџи&ary=0, 0, 0, 0, C KomponenteZфhlen1=88, 88, 1597, 715, Z UserForm1=220, 220, 1587, 807, , 198, 198, 1565, 785, C fД€0* pH‚dфKomponenteZфhlenЂL@ rU€€€€~~{ џџџџџџџџџџџџџџџџ   RootComponentpfadConfNamenr ёy  ) Й “K*mџџџџrU€€€~~~~~dObjectType $GetSelectedObjectџџмў­ єЉ„ dџfLџ*РМ,lџhџ,Tџ,џџ џќўмўЬўМўџџџџџџџџџџџџџџ%‚ Цџџџџўџџџ џџўџџџџџџџџџџџ% `8`џџџџџџџџ єўkџџџџџџџџ” iƒўџџџџџџџџџџџџџџџџџ `„џџџџxџџџ 6@N`b FX,dirџџџџџџџџџџџџjProject Item Data$џџџџш Control List Data$џџџџџџџџ СSU‰%Ъ СSU‰%ЪReqControl List Data*џџџџџџџџ СSU‰%Ъ СSU‰%ЪUserForm1џџџџџџџџџџџџp8KomponenteZфhlen1$џџџџџџџџZšReqControl List Data*џџџџџџџџџџџџ  Control_Data_CurVer(#џџџџџџџџ  o!џџџџўџџџCompObjџџџџ"џџџџжaVBFrameџџџџџџџџџџџџб Control List Data$џџџџџџџџџџџџ (__SRP_4џџџџi$__SRP_5џџџџџџџџg(__SRP_3џџџџџџџџџџџџSи__SRP_2џџџџPtakro macht nur in Baugruppen Sinn!! VBE6.DLL ёџџџџS (  SelectionManager ,GetS Z= ~ =‡LV %J< 9st dole>stdol e h%^*\G{0002`0430-C 0046}#2.0#0#C:\WINDOWS\system32\e2.tlb#OLE Automation#0€Sl€dWorks>‚y"S€CdW€GrЈks€Ht€j€H83A33D31-27C5-11CE-BFD4€H400513B€B57}#11ISoliƒ.200Р9\sldw5‚H…;  Type Library#6€SwConst>ЁwCMnHost Project Item Names0џџџџ  eпT%Ъ jQњˆ%ЪVBA Project Data"џџџџжHost Project Items&џџџџџџџџ4VBA Project Signature,џџџџџџџџџџџџ ўџџџўџџџ3 ўџџџCЬ !"#$%&'()*+,-./0126ўџџџ5ўџџџ789:;<=>?@ABDEFGHIJKLMNOlQRЩTUVWXYZ[\]^_`abcdefh‰jkўџџџmnoўџџџqrstuvwxyz{|}~ƒ€Эє{@ThisLibrary*{№5{ L{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{P L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{";{А$={`&šЄ&ЎL{801A0000-A66C-11D3-A8BD-0000861EBBD6}И&ТLC:\SWX-USER\Makro\KomponenteZфhlID="{44A053EC-8354-4191-BC9A-A03E9B56948F}" Document=ThisLibrary/&H00000000 Module=KomponenteZфhlen1 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=UserForm1 Name="KomponenteZфhlen" HelpContextID="0" VersionCompatible32="393222000" CMG="8D8F5C82DC60E060E060E060E0" DPB="6F6DBEDC425C255D255D25" GC="51538025812581DA" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLiЉс.E р….`ŒM ДC:\WINDOWS\system32\FM20.DLLMSForms aa‰б sцwv–лoHКŠђЅN -C:\DOKUMEen.swpЬR•О type libraryю*ThisLibraryThisLibraryKomponenteZфhlen1KomponenteZфhlen1UserForm1UserForm1200~1\RKB\LOKALE~1\Temp\VBE\MSForms.exd A ai бАmain !TraverseAnzahlџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџThisLibraryџџџџџџџџ eпT%Ъ jQњˆ%ЪProject_Data_CurVer( џџџџ‡ Host Project Item List Data8џџџџџџџџџџџџ†VBAџџџџџџџџАИbпT%ЪАИbпT%Ъй‚х„…ˆўџџџўџџџ˜Š‹ŒŽ‘’“”•–—ўџџџ™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЖЗИЙКЛМНўџџџПРСТУФХЦЧШЪўџџџЫЭўџџџЮЯачвгдеўџџџзўџџџўџџџклмнопрстуфўџџџцўџџџўџџџўџџџўџџџўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPROJECTwmџџџџџџџџџџџџ4zPROJECT џџџџ 6_VBA_PROJECTџџџџџџџџџџџџ9МThisLibraryџџџџџџџџОl__SRP_0џџџџл __SRP_1џџџџџџџџџџџџэUserForm1 џџџџ @б“%Ъ YКB„%Ъfџџџџџџџџџџџџи&brary=0, 0, 0, 0, C KomponenteZфhlen1=88, 88, 1597, 715, Z UserForm1=220, 220, 1587, 807, , 198, 198, 1565, 785, C fД€0* pH‚dфKomponenteZфhlenЂL@ rU€€€€~~~y џџџџџџџџџџџџџџџџ   RootComponentpfadConfNamenr ёy  ) Й “K*mџџџџrU€€€~~~~~џџџџџџџ xswmodel_NewSelectioџџмў­ єЉ„ dџfLџ*РМ,lџhџ,Tџ,џџ џќўмўЬўМўџџџџџџџџџџџџџџ%‚ Цџџџџўџџџ џџўџџџџџџџџџџџ% `8`џџџџџџџџ єўkџџџџџџџџ” iƒўџџџџџџџџџџџџџџџџџ `„џџџџxџџџ 6@N`b FX,dirџџџџџџџџџџџџjProject Item Data$џџџџш Control List Data$џџџџџџџџ jQњˆ%Ъ jQњˆ%ЪReqControl List Data*џџџџџџџџ jQњˆ%Ъ jQњˆ%ЪUserForm1џџџџpKomponenteZфhlen1$џџџџџџџџNЃReqControl List Data*џџџџџџџџџџџџы Control_Data_CurVer(#џџџџџџџџъ o!џџџџўџџџCompObjџџџџ"џџџџжaVBFrameџџџџџџџџџџџџб Control List Data$џџџџџџџџџџџџщ(L:tM~€ OM4687F359-55D0-4CD3-B6CF-2EB42C11F9ф89MwcСC&F-ƒУ&B ant t)l ) С%)mma4ndQСФ)m`man€wR @wРA+0AC1DE9F-3FBC@+25-868D-7D4E91Р39CCE0\+,, € SWU€tilitie@,V€|UЂi€iеТeР…РС, 7DBD2|3D17-481A-999541E767BCD1}Р#7d7.5ЄOAs\gtswЦ0‚† л…MSForm@/С…MSTF‚Ќm@-3@BYD452EE1-E08F-1 0@,8-02608C4D0BB4hFM20.DLL#Micro soft Ђ `n€ ObjecteVh/;Р$1D%Ѓs0W)wA(w0Р;0Тd#`@У]и0žР€`‚1677E6€73-DB96€16F-BA8A-F21Fр5104EHDOKUME~1\RKB\ LOKALTe€mp\VBE\Ф0.exd`џџџџџџџџ(љ`”џџџџџџџџџџџџrU€€€ и йq I ™ Щ Q ё й  ) Q џџџџБ фsс.E р….€`ŒM Д "тЇт L„ЁMThisD{TGЁMTРœi 5L@ibr`drPy2˜Q  HЂ1b­­А","(ž""+ЂFр­К1GKQ Fmp nБnС``eZф Гиn1рв2п@€$1/,/œP!b%  UseЖrсN С 'e &g%^!Ъ2г/тSР3m&DЧc&(@ уЁсџџџџџџџ__SRP_4џџџџiЌ__SRP_5џџџџџџџџџџџџg(__SRP_3џџџџџџџџџџџџSи__SRP_2џџџџPеs Makro macht nur in Baugruppen Sinn!! VBE6.DLL ёџџџџS (ЇВstdol e h%^*\G{0002`0430-C 0046}#2.0#0#C:\WINDOWS\system32\e2.tlb#OLE Automation#0€Sl€dWorks>‚y"S€CdW€GrЈks€Ht€j€H83A33D31-27C5-11CE-BFD4€H400513B€B57}#11ISoliƒ.200Р9\sldw5‚H…;  Type Library#6€SwConst>ЁwCMnL:tM~€ OM4687F359-55D0-4CD3-B6CF-2EB42C11F9ф89MwcСC&F-ƒУ&B ant t)l ) С%)mma4ndQСФ)m`man€wR @wРA+0AC1DE9F-3FBC@+25-868D-7D4E91Р39CCE0\+,, € SWU€tilitie@,V€|UЂi€iеТeР…РС, 7DBD2|3D17-481A-999541E767BCD1}Р#7d7.5ЄOAs\gtswЦ0‚† л…MSForm@/С…MSTF‚Ќm@-3@BYD452EE1-E08F-1 0@,8-02608C4D0BB4hFM20.DLL#Micro soft Ђ `n€ ObjecteVh/;Р$1D%Ѓs0W)wA(w0Р;0Тd#`@У]и0žР€`‚1677E6€73-DB96€16F-BA8A-F21Fр5104EHDOKUME~1\RKB\ LOKALTe€mp\VBE\Ф0.exdq I ™ Щ ё rU€€€ џџџџџџџџH$Й`џџџџџџџџ(љ`”џџџџџџџџџџџџ(nџџџџџџџџџџџџ`фsс.E р….€`ŒM Д "тЇт L„ЁMThisD{TGЁMTРœi 5L@ibr`drPy2˜Q  HЂ1b­­А","(ž""+ЂFр­К1GKQ Fmp nБnС``eZф Гиn1рв2п@€$1/3/œP!b%  UseЖrсN С 'e &g%^!Ъ2г/ТSР3m&DЧc&(@ уЁсџџџџџџџЬamџ фњ*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\GEMEIN~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications"*\G{801A0000-A66C-11D3-A8BD-0000861EBBD6}#1.0#0#C:\Programme\Gemeinsame Dateien\SolidWorks Shared\swvba.tlb#SolidWorks Extensibility Type LibraryМ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automationд*\G{83A33D31-27C5-11CE-BFD4-00400513BB57}#11.0#0#C:\SolidWorks2009\sldworks.tlb#SldWorks 2009 Type Libraryш*\G{4687F359-55D0-4CD3-B6CF-2EB42C11F989}#11.0#0#C:\SolidWorks2009\swconst.tlb#SolidWorks 2009 Constant type libraryю*\G{0AC1DE9F-3FBC-4C25-868D-7D4E9139CCE0}#11.0#0#C:\SolidWorks2009\swcommands.tlb#SolidWorks 2009 Commands type library *\G{7DBD21CE-3D17-481A-9995-9941E767BCD1}#7d7.5#0#C:\SolidWorks2009\sldUtils\gtswUtilities.tlb#Solidworks Utilities 2009 Type Libraryо*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{7677E673-DB96-486F-BA8A-F21F01A5104E}#2.0#0#C:\DOKUME~1\RKB\LOKALE~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д џџџџџџ=‡LVџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ LThisLibraryO:4c1f873dџџThisLibraryџџž­џџ"KomponenteZфhlen1O<4c1f8755џџ"KomponenteZфhlen1џџœP@џџџџ ,џџUserForm1O=4c1f8755џџЧUserForm1џџDЧ џџџџ@т џџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџcbvZOД/H}є<Џпџџџџџџџџ`Ÿˆ•/ @ч‚IТXкџџџџџџџџЧЕ6е9РHЇ\єqадHџџџџџџџџ €}ˆџŒ8 €џAs€џCase=€џDimN€џEventP€џExplicit_€џIf‹€џOptionЏ€џSubВ€џThenР€џwith SolidWorks; VBAїтWin16С~Win32MacГВVBA6­#Projekt1вA stdole“` VBAProject8БKЌ(KomponenteZфhlenjз ThisLibraryGЉ €џ_EvaluateйModul1Э KomponenteZфhlen1Ч—SwAppы‘Ќ(mainˆ, €џApplicationЅ*Œ(џSldWorks$ SwConstœ SwCommandsœ€ SWUtilitiesѕAnzahlDerKomponente&ћswmodel[ƒ „џComponentљ" AktConfig RootComponentй pfad,—ConfNameЯяnrm^ €џGetPathName€џReferencedConfigurationн InArbeitMarkieren €џGetActiveConfigurationUџ€џGetRootComponentЫD!TraverseAnzahlDerKomponenteZфhlenШ vChildComp#ъ swChildCompmŒgefundenPjKomponentenpfadЈKomponentenDateiН? KonfigurationЇZNGnameFDi`ja €џGetChildren6ж €џIsSuppressed2StAlleMarkierenCnStќckAlleMarkieren_ClickіUserForm_Initialize5cAStAlleMarkierens(dimStAlleMarkieren„ƒ„џFrameЪ€џSetStatusBarText‚‚€џRadiusрV compDatei#€џ_B_var_compDateiE, _B_var_MidэpInStrRevФˆ aktivedoc™ˆ €џActiveDocк’swSelMgr#%€џSelectionManagerХѓFehlerОВ€џGetType)JswEdge€€џGetSelectedObject5Я/€џ_B_var_swmodel^wMsgBox—R €џ_B_var_Exit‹п expliciteœf €џ_B_var_optionьs AlleMarkierenЂП Workspace3€џ_B_var_Component>,€џ_B_var_StAlleMarkierenжW _B_var_StringгŠ _B_var_FormatрselType„Ј €џswSelFACESёО €џswSelEDGESa“ €џswSelVERTICES€џswSelCOMPONENTSЌZeichnungIstVonKomponentep=model9Э €џswDocDRAWINGVбSelMgrі€џGetSelectedObjectTypeЈТ selEntity/є€џGetSelectedObject4Ю/ €џGetComponentА‹ €џ_B_var_Select'E €џ_B_var_caseГк €џ_B_var_SelMgrp€џGetSelectedObject6а/ SelSelMgrМі€џ_B_var_SelSelMgr€№seSelMgrˆ€џ_B_var_seSelMgrPи€џ_B_var_selEntityѓэ UserForm1)жMSFormsC€џShowѕ €џџџ_B_var_Show"џџџџš џџџџџџџџPџџџџLџџџџ”џџџџ<0џџ<4џџ<8џџ<<џџ<џџџџџџ"иaš0{BB56FFAB-BE4A-467B-A695-AE33369F84C7}{5B9C9C4E-FD02-4A48-8AED-D3DA3AE91C25}˜И€ўџ0џџ(џџџџџџџџџџ%ўџџџџџџџџџXџџ0џџџџџџџџ %%џџџџџџџџ(8Аџџџџ ,†`џџџџ Рiƒўџџџџџџџџџџџџџџџџџ  ƒўџџџџџџџ№electedObjectCount *GetSelecteџџ№€"€-џџџџ4˜`@џџџџџџџџџџџџ(nб) џџџџG8y бЁ џџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<Й с џџџџџџџџџџџџЬamџ фњ*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\GEMEIN~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications"*\G{801A0000-A66C-11D3-A8BD-0000861EBBD6}#1.0#0#C:\Programme\Gemeinsame Dateien\SolidWorks Shared\swvba.tlb#SolidWorks Extensibility Type LibraryМ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automationд*\G{83A33D31-27C5-11CE-BFD4-00400513BB57}#11.0#0#C:\SolidWorks2009\sldworks.tlb#SldWorks 2009 Type Libraryш*\G{4687F359-55D0-4CD3-B6CF-2EB42C11F989}#11.0#0#C:\SolidWorks2009\swconst.tlb#SolidWorks 2009 Constant type libraryю*\G{0AC1DE9F-3FBC-4C25-868D-7D4E9139CCE0}#11.0#0#C:\SolidWorks2009\swcommands.tlb#SolidWorks 2009 Commands type library *\G{7DBD21CE-3D17-481A-9995-9941E767BCD1}#7d7.5#0#C:\SolidWorks2009\sldUtils\gtswUtilities.tlb#Solidworks Utilities 2009 Type Libraryо*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{7677E673-DB96-486F-BA8A-F21F01A5104E}#2.0#0#C:\DOKUME~1\RKB\LOKALE~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д џџџџџџЇzLUџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ LThisLibraryJj4c1f7aa7џџThisLibraryџџž­џџ"KomponenteZфhlen1Js4c1f7b71џџ"KomponenteZфhlen1џџœP@џџџџ 3џџUserForm1L44c1f7c7cџџЧUserForm1џџDЧ џџџџ@Т џџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@џџџџcbvZOД/H}є<Џпџџџџџџџџ`Ÿˆ•/ @ч‚IТXкџџџџџџџџЧЕ6е9РHЇ\єqадHџџџџџџџџ €}ˆџŒ8 €џAs€џCase=€џDimN€џEventP€џExplicit_€џIf‹€џOptionЏ€џSubВ€џThenР€џwith SolidWorks; VBAїтWin16С~Win32MacГВVBA6­#Projekt1вA stdole“` VBAProject8БKЌ(KomponenteZфhlenjз ThisLibraryGЉ €џ_EvaluateйModul1Э KomponenteZфhlen1Ч—SwAppы‘Ќ(mainˆ, €џApplicationЅ*Œ(џSldWorks$ SwConstœ SwCommandsœ€ SWUtilitiesѕAnzahlDerKomponente&ћswmodel[ƒ „џComponentљ" AktConfig RootComponentй pfad,—ConfNameЯяnrm^ €џGetPathName€џReferencedConfigurationн InArbeitMarkieren €џGetActiveConfigurationUџ€џGetRootComponentЫD!TraverseAnzahlDerKomponenteZфhlenШ vChildComp#ъ swChildCompmŒgefundenPjKomponentenpfadЈKomponentenDateiН? KonfigurationЇZNGnameFDi`ja €џGetChildren6ж €џIsSuppressed2StAlleMarkierenCnStќckAlleMarkieren_ClickіUserForm_Initialize5cAStAlleMarkierens(dimStAlleMarkieren„ƒ„џFrameЪ€џSetStatusBarText‚‚€џRadiusрV compDatei#€џ_B_var_compDateiE, _B_var_MidэpInStrRevФˆ aktivedoc™ˆ €џActiveDocк’swSelMgr#%€џSelectionManagerХѓFehlerОВ€џGetType)JswEdge€€џGetSelectedObject5Я/€џ_B_var_swmodel^wMsgBox—R €џ_B_var_Exit‹п expliciteœf €џ_B_var_optionьs AlleMarkierenЂП Workspace3€џ_B_var_Component>,€џ_B_var_StAlleMarkierenжW _B_var_StringгŠ _B_var_FormatрselType„Ј €џswSelFACESёО €џswSelEDGESa“ €џswSelVERTICES€џswSelCOMPONENTSЌZeichnungIstVonKomponentep=model9Э €џswDocDRAWINGVбSelMgrі€џGetSelectedObjectTypeЈТ selEntity/є€џGetSelectedObject4Ю/ €џGetComponentА‹ €џ_B_var_Select'E €џ_B_var_caseГк €џ_B_var_SelMgrp€џGetSelectedObject6а/ SelSelMgrМі€џ_B_var_SelSelMgr€№seSelMgrˆ€џ_B_var_seSelMgrPи€џ_B_var_selEntityѓэ UserForm1)жMSFormsC€џShowѕ €џџџ_B_var_Show"џџџџџџџџPџџџџLџџџџ”џџџџ<,џџ< фмВ Ь М  LDЧџџˆЖџџџџџџџџDџџhй+ЃƒЋ@Иu4ЪЯ2ыЇXg@нJŽ’w’8‚™Nœœ[§HJŠэгк:щ%ЙRйЎф#ёCАf,™яŠНџџџџџџџџџџџџxЙRйЎф#ёCАf,™яŠНhй+ЃƒЋ@Иu4ЪЯ2ыџџMEџџџџџџџџџџпџџ,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ SPџџџџSџџџџSџџџџSџџџџa”џџ>"џџџџџџџџPџџџџLџџџџ”џџџџš џџџџ<0џџ<4џџ<8џџ<<џџ<џџџџџџ"иaš0{BB56FFAB-BE4A-467B-A695-AE33369F84C7}{5B9C9C4E-FD02-4A48-8AED-D3DA3AE91C25}˜˜€ўџ0џџ(џџџџџџџџџџ%ўџџџџџџџџџXџџ0џџџџџџџџ %%џџџџџџџџ(8Аџџџџ ,†`џџџџ Рiƒўџџџџџџџџџџџџџџџџџ Xƒўџџџџџџџ№’w’8‚™ЙRйЎф#ёCАf,™яŠНЅ1^КЙIЇй &—†‡„ 1џџџ "€-џџџџ4˜`@џџџџџџџџџџџџЉЉб) џџџџG8y бЁ џџџџџџџџџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ<Й с џџџџџџџџџџџџ@ўџџџџџtџџџ џџ џџџџhђџџџџ џџџџџџџџ`ђ№xџџџџџџџџџџџџџ№„€џџџџШ,ђџџџџ`џџџџџџџџˆxџixџџ” Мiƒўџџџџџџџџџџџџџџџ џџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆџџџџџџџџџџџџџџџџџџџџџџџџиИџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€џџџџџџџџџџџџ˜џџаX@џџџџџџџџџџџџ€˜џџџџ џџ„€аџџџџ˜џџџџ€€@ўџPdџџџ џџ џџџџџџџџ`@џџџџџџџџџџџџ€ИџџЄ€ )ƒџџџџџџџџџџ @ўџhTџџџ џџ @ўџHDџџџ џџ ўџџџ@ўџ04џџџ џџ )џџџџИџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ џџџџр@ўџ`$џџџ џџ џџџџ@ўџxџџџ џџ џџџџ@ўџџџџџџџџ џџ џџџџ@ўџџџџџєўџџ џџ џџџџџџџџШ(џџџџџџџџАџџџџ8џџџџџџџџ0АџџџџџџџџјШHЄџџџџџџџџџџџџџџџџџџџџџџhЇzLU*\R3*#13e$*\Rffff*L44c1f7c7c*\R0*#14*\R3*#96*\R1*#0*\R1*#3$*\Rffff*Js4c1f7b71пА8џџџџ<ўЪ€€ € џџџџ"€Р 0NT@€ џџџџB Ј€ и € џџџџџџџџ№Э–8–(oџџ`э !".cэ !v.,l ,!~Ќ›GЖ*Dieses Makro macht nur in Baugruppen Sinn!A@†F|j]ђФАth eveiџџh B@џџ џџџџџџр]ђˆџџџџџџџџXрStop)6Ж 6џџџџРџџџџRВAttribute VB_Name = "UserForm1" " €Bas€0{BB56FFAB-BE4A-467B-A695-AE33369F84C7}{5B9C9C4E-FD02-4A48-8AED-D3DA3AE91C25} dGlob„al‹Spaco False ŠCr@eatablP€redeclaDIdдTru BE`xpose0TemplateDeriv–Cus tomiz‹DOp tion 0licit Dim WithEvents swmodel As SldWorks.AssemblАyDoc x.вVarHelpIDj-1 PPT Sub н_Initialize() 4ASwApp С8ObjecL Set = €ѕ€,a/.%ƒA Х-Т=У .ActРFТ* IfE6.GetType <> 2 Then MsgBox "Dieses Makro macht nur in Baugrupp Sinn!" :@PiР&ub End8Щ;FunРРY„%_NewS elР5_Notify();Long1KomponР`eZфhlen 1.MУ 'StopEA•ТGИz гАj[ €lІгЈН†ЛжLфzSЇ Lžџџ#ˆЖџџџџџџџџџџџџЖk•ТGИz гАj[ €lІгЈН†Лж№Ф д(џџџџЕ - LœPџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ > џџџџџџџџџџџџџџџџLџџџџ”џџџџџџџџџџџџš"џџџџџџџџ<,џџ<0џџ<4џџ<8џџ<<џџ<џџџџџџP %иXџџџџџџџџ8џџџџ œž ЂrњD@ўџџџџџHџџџ џџ %%Pџџџџ `„џџџџxџџџ џџџџџџ`„6џџџџXџџџџџџџ`„fџџџџ`џџџ џџ8`„4џџџџ\џџџџџ`„xџџџџpџџџ џџџџџџ`„2№dџџџ џџ џџ`„0`hџџџ џџ џџ`„lџџџџTџџџџџџџ@ўџЈ8џџџ џџ џџ`„,`tџџџ џџџџА Dџџџџ`џџџџџџџџиМўk˜џџџџџџ+„iƒ2џџџџ џџ џџИ€1\RKiƒ4џџџџџџџџи€SLDiƒ6џџџџџџџџј€Кiƒ8џџџџџџџџџџџџ€un`„Fџџџџlџџџ џџun`„Hјhџџџ џџsk`„8џџџџRџџџџџra`„.џџџџlџџџ џџra`„šџџџџLџџџџџnh@ўџX(џџџ џџ N.@ўџЈџџџ џџ `„Tџџџџdџџџџџ `џџџџџџџџ\џkџџџџџџџџџџ„ X`џџџџџџџџ№0ўkџџџџџџџџџџ&&„@ўџРџџџ џџ џџџџ@ўџџџџџџџџџџ џџџџџџpџџ џџ@ўџџџџџџџџџџ џџШƒџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРxџџџџџџџџџџџџџџџџи8ЈHџџџџxџџџџџџџџ8 џџџџџџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџpџџџџџџџџџџџџџџџџˆ \ЌШўџџ џџ џџ@ўџи№ўџџ џџ џџџџ@ўџ№рўџџ џџ @ўџаўџџ џџ @ўџ Рўџџ џџ а@ўџ8Аўџџ џџ @ўџP ўџџ џџ @ўџ€ўџџ џџ @ўџh€ўџџ џџ @ўџ№pўџџ џџ @@ўџ˜`ўџџ џџ @ўџАPўџџ џџ @ўџџџџџ@ўџџ џџ ( џџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜џџџџџџџџИ0џџџџиџџџџџџџџџџџџxџџџџрџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџјЈ@ўџTџџџ џџ @ўџИPџџџџџ аџџ џџ@ўџџџџџLџџџџ џџ№Иџџ@@ўџ<џџџ џџ џџџџD @ўџ@ўџH,џџџ џџ џџџџџџџџЈџџџџ0џџџџ8@ўџ`џџџ џџ в@ўџx џџџ џџ и@ўџЈќўџџ џџ о@ўџџџџџьўџџ џџ ф@ўџРмўџџ џџ ъ@ўџиЬў@ўџџџџџtџџџ џџ џџџџ@8@џџџџџџџџџџџџ€@џџџџ џџ„€џџџџШ,ђџџџџ`џџџџџџџџˆxџkxџџ” Мiƒўџџџџџџџџџџџџџџџ џџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџˆџџџџџџџџџџџџџџџџџџџџџџџџи`џџџџиџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€џџџџxџџџџ˜џџџџ€ @ўџ№dџџџ џџ €X@џџџџџџџџџџџџ€ИИџџЄ€€џџџџ џџџџ `@ўџTџџџ џџ @ўџ8Dџџџ џџ @ўџ 4џџџ џџ @ўџP$џџџ џџ @ўџhџџџ џџ @ўџџџџџџџџ џџ ўџџџ@ўџџџџџєўџџ џџ )џџџџИџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџH˜`џџџџрhђџџџџ џџџџџџџџ`ђ0xџџџџџџџџџpHџџ џџџџџџ0џџџџ џџџџџџџџШџџџџџџџџџџџџџџџџџџџџџџx(џџџџџџџџџџ џџ №@ўџџџџџМўџџ џџ іџџџџИ њџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџИџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџјЦџџџџџџџџџџџџџџ@ўџаlџџџ џџ џџџџ@ўџџџџџ\џџџ џџ џџџџџџџџ @ўџџџџџ0ўџџ џџ €џџџџаиџџџџџџџџџџџџџџџџџџџџXџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџЇzLU$*\Rffff*Js4c1f7b71*\R0*#f*\R4*#2*\R0*#14*\R1*#0*\R1*#3,*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\..\Programme\Gemeinsame Dateien\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#f*\R0*#23$*\Rffff*L44c1f7c7cпўЪ9€ Аџџџџ8џџџџџџџџ0АџџџџџџџџјШHЄџџџџџџџџџџџџџџџџџџџџџџh=‡LV*\R3*#13e$*\Rffff*O=4c1f8755$*\Rffff*O<4c1f8755*\R0*#14*\R3*#96*\R1*#0*\R1*#3пА8џџџџ<ўЪ€€ € џџџџ"€Р 0NT@€ џџџџB Ј€ и € џџџџџџџџ№Э–8–(oџџ`э !".cэ !v.,l ,!~Ќ›GЖ*Dieses Makro macht nur in Baugruppen Sinn!A@†F|j]ђФАth eveiџџh B@џџ џџџџџџр]ђˆџџџџџџџџXрStop)6Ж 6џџџџРџџџџRВAttribute VB_Name = "UserForm1" " €Bas€0{BB56FFAB-BE4A-467B-A695-AE33369F84C7}{5B9C9C4E-FD02-4A48-8AED-D3DA3AE91C25} dGlob„al‹Spaco False ŠCr@eatablP€redeclaDIdдTru BE`xpose0TemplateDeriv–Cus tomiz‹DOp tion 0licit Dim WithEvents swmodel As SldWorks.AssemblАyDoc x.вVarHelpIDj-1 PPT Sub н_Initialize() 4ASwApp С8ObjecL Set = €ѕ€,a/.%ƒA Х-Т=У .ActРFТ* IfE6.GetType <> 2 Then MsgBox "Dieses Makro macht nur in Baugrupp Sinn!" :@PiР&ub End8Щ;FunРРY„%_NewS elР5_Notify();Long1KomponР`eZфhlen 1.MУ 'StopEALфzSЇ Lžџџ#ˆЖџџџџџџџџџџџџЖk•ТGИz гАj[ €lІгЈН†Лж№Ф д(џџџџЂ & LœPџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ > џџџџ<(џџџџџџџџџџџџџџLџџџџ”џџџџџџџџš"џџџџџџџџ<,џџ<0џџ<4џџ<8џџ<<џџ<џџџџџџP % џџџџ`џџџџџџџџ№\џkџџџџџџџџџџ6„џџџџHџџџџ `„џџџџxџџџ џџџџџџ`„6џџџџXџџџџџџџ`„fџџџџ`џџџ џџ8`„4џџџџ\џџџџџ`„xџџџџpџџџ џџџџџџ`„2№dџџџ џџ џџ`„0`hџџџ џџ џџ`„lџџџџTџџџџџџџXџџџџџџџџџџ`„,`tџџџ џџџџИ D`џџџџџџџџHМўk˜џџџџџџ(„iƒ2џџџџ џџ џџИ€1\RKiƒ4џџџџџџџџи€SLDiƒ6џџџџџџџџј€Кiƒ8џџџџџџџџџџџџ€un`„Fџџџџlџџџ џџun`„Hјhџџџ џџsk`„8џџџџRџџџџџra`„.џџџџlџџџ џџra`„šџџџџLџџџџџnhџџџџјЦ(џџџ џџ .@ўџиlџџџ џџ `„Tџџџџdџџџџџ@ўџџџџџ\џџџ џџ џџџџџџџџ œž ЂrњDџџр„ X`џџџџџџџџ0ўkџџџџџџџџџџ&&„@ўџџџџџHџџџ џџ џџџџ@ўџ 8џџџ џџ џџ@ўџ0(џџџ џџ @ўџџџџ џџ иƒџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРxџџџџџџџџџџџџџџџџи8ЈHџџџџxџџџџџџџџXpџџџџˆџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџxH@ўџЈџџџ џџ џџ@ўџџџџџџџџџџ џџ@ўџџџџџџџџџџ џџ№\Ќ(P`ўџџџџ@ўџР№ўџџ џџ џџ@ўџирўџџ џџ џџ@ўџ№аўџџ џџ џџ@ўџРўџџ џџ џџџџ@ўџ Аўџџ џџ џџџџ@ўџ8 ўџџ џџ џџџџ@ўџhўџџ џџ џџџџ@ўџP€ўџџ џџ џџџџ@ўџАpўџџ џџ џџџџ@ўџ€`ўџџ џџ А@ўџ˜Pўџџ џџ @ўџџџџџ@ўџџ џџ @ўџџџџџ0ўџџ џџ џџ@ўџTџџџ џџ @@ўџјPџџџџџ @ўџџџџџLџџџџ  јџџ џџџџџџј џџџџЈџџџџ0џџџџ8Рџџџџџџџџџџџџџџџџџџџџџџџџџџџџ˜џџџџџџџџИ0џџџџиџџџџџџџџџџџџШџџџџшџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџрџџџџџџџџџџџџџџџџ@ўџx<џџџ џџ њџџџџDџџџџџџџџџџџџџџ@ўџ0,џџџ џџ џџџџ@ўџHџџџ џџ џџџџ@ўџ` џџџ џџ џџџџ@ўџќўџџ џџ џџџџ@ўџџџџџьўџџ џџ џџџџ@ўџЈмўџџ џџ @@ўџРЬўџџ џџ (@ўџџџџџМўџџ џџ № џџџџџџџџ џџџџ0ўџџ џџ €џџџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџ =‡LV$*\Rffff*O<4c1f8755,*\G{00"˜Ј € џџџџ"€ (€ Ш€ Ј€ и€ `€ p€ € €  € А€ 8€ €€ џџџџ@ € `€ џџџџP,P& & ј 8№€ џџџџ H$D XhxˆАR†РИ" Р€ Ш€ и€ ш ј 0,JH€ <Р  xˆ ˜џџџџ€–]ђDђџџџџPЭ]ђD`ђ]ђDHђ .!:'4 .!<'6э ,!@.0э 0!B.2Ќ'8 2 4 6 8A@D]ђDРFalsoџџ˜–X]ђDE]ђD0$rau]ђDР$.sl 2!X'Fˆџ TўЌ F‘’э T$F.H H 4 6 8A@D H!Z H!: 4 6 H!<œ 8Ќ '8kџџаџЧШoџџРэ !v.,э !f.farЌЖ $\ lЖ  6Ж Anzahl=  8$Ќ fB@h An 4 4Ж\$rЌ $њ'lэ !".э ,!z.x]ђD№œ]ђDи%‚]ђDx%‚]ђDЈ]ђDx]ђDџџџџ€]ђD8]ђD`џџџџ˜n ЂKT šъ œK žK  KTCES,эЌ x%‚!В..эЌ x%‚..Ќ x%Ќ'šр0Objekttyp ermittelnџџџџˆџџџџџџџџш–иoџџ ј ЦB@Ъџџџџџџ№р 5swChildComp.Select True 'Markiert alle gleichen Teile x!тЌ›G|jрZIf swmodel.GetType <> 2 Then MsgBox "Dieses Makro macht nur in Baugruppen Sinn!": Exit SubџџџџџџџџlДAttribute VB_Name = "KomponenteZфhlen1" Option Explicit Sub ma€in() UserForm1.Show vbModeles€s End \ j МADimР SwAppNAs ObjecЧp"swmY  "SelMgvr#"Cу„AktConfigёRoo€„–"FrЊ!pfa–d‚hSЫngƒЌПzDЯ„4 c€h Datein†ˆƒ€"IntegerGselTypfe#Lo…"ƒ Sdetj= €k„a‡.SldWor^k@|AA Хj=У .ActiveDoBc'If „.GetТ<> 2 Then MsgBox "Dieses Makro€œcht nur in Ba@ugrupp S@inn!":ЈiЙ'ub›G!„ƒ=F‡•@ДManaЦ?O‚#У С# edC CPount€Ч0C'E~xEMA7(1) 'Сkttyp ermit0telnУC C№ase DCwРFACES,#Р2РEDGЦVEјRTI€Ч С СaGЛ=(5 сІ‘COMPONENTSџп ap)С cƒ€„Х{3ЃТa= І!Pathс_#G]= Mid(!, In@bRevФ"\"р) + 1ф“&h) Referenc„edСigur"YџЃ 'g€'СуXt‹‚@dхˆ!Šу  r= 0cTraverseAnzahPlDerЅ ,Ž C!С#, nDyПCeoЂЃ B.@StatusBa€rText (CŠ€(20, "  '4& '-&@РI" В& 3nfЁ @"!L Ѓ Ч aРat(nr)/&ПPriжv`“СР ~(jМїЃс,'цЁ! !фš„?AЈvChil р 2 Then MsgBox "Dieses Makro macht nur in Baugruppen Sinn!": Exit SubџџџџџџџџjДAttribute VB_Name = "KomponenteZфhlen1" Option Explicit Sub A Ј() Dim SwAppAs Objecx"Dswmodel "РSelMgr#"CЏ#"AktC onfig"Rožo€„|"FrУ!pfad‚hђSБng‡‹DЕ„ 4 c€hDateКin†ˆƒ€"I€иger‡4selT˜ype"FLoE‘Setj= €kwaz.SldWАorksG Хj=У .ActiveD„ocƒ'If „.GetТ<> 2 Then MsgBox "Dieses Makro macht nur in Baugrupp Sinn!"Ъ:›i'ub›С0щС*sw„ƒ=F•с@ЇManaЦ?‚#У С# edC Cou”nt€К0C'ExEMA7(1) 'Сkttyp ermitte lnУC Cas|e DC2F`ACES,Р2Р EDGЦVERTIП€Ч С A@GЛ(5@'С=F COMPOрNENTSп ap)УС cEnd cу3ЃТa= І!Pathс_#G]= Mid(!, In@bRevФ"\"р) + 1Є‹&h) Referenc„edСigur"YџЃ 'g€'СуXt‹‚@dхˆ!Šу  r= 0cTraverseAnzahPlDerЅ ,Ž C!С#, nDyПCeoЂЃ B.@StatusBa€rText (CŠ€(20, "  '4& '-&@РI" В& 3nfЁ @"!L Ѓ Р FormРat(nr)/ђљLЛ[жV)јЦ џџџџзAЉmain =BУМДТFП™ЁвTFˆљфŽ“ВйEšд_2С{єqЋџVЛJО{FІ•Ў36Ÿ„ЧNœœ[§HJŠэгк:щ%m{ЛД­“KЉv?I§Оe5=ЃƒХ7ЮПд@ЛWswmodelШ[qJ—І eР‹UserForm F3Dynamic Щџџџџџџџџ UserForm_Initializeswmodel_NewSelectionNotify H44 €lІгЈН†Лж€lІгЈН†Лж! I џџџџActiveDoc5=ЃƒХ'ЮПд@ЛWGetType TDieses M }ѕ 55GetComponentGetPathName \ .ReferencedConfiguration ,GetActiveConfiguration  GetRootComponent Frame      Anzahl=  SetStatusBarText ёџџџџХ H ёџџџџx h ёџџџџ_ ˆ ёџџџџ” ЈxџW8џќ4ќј`џ58џ†:(џN8џ8џѕџ  џlTџFџћя№ў:рўћяаўlXџFРўћяАў: ўћяўѕѕ'`ўRџM€ў@Pў Pўћя@ў%`џў˜68џџ№ўаўАў`ўўPў@ў`L<L4 Tџpџdџhџlџ`џtџxџ\џXџ4 Hџ8џџ№ўаўАўў`ўPў@ўМH WTџќіlџѕdџlџќ5IєќЫўdLџЙdџ§“@lџўЎTџќ4ќјhџ5Tџlllhџ JhџWTџћФ,џhџWџ €F<џ]ћ/ џћ'ќў€Fьў]hџWмўћ/Ьўћ'Мўџ6TrU€€€ џџџџџџџџH$Йњџџџ`Сџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ]ЯEyиtџ$ 8QtџxџxџWdџ§ѓ[tџ  tџ5dџ&tџ ˜tџWdџ(Tџ]ћ@tџ5dџ‹+'єў'џ'Dџѕ:TџNdџdџ 6dџDџџєў((ˆ((xџ tџdџDџџєўH ќТџ/ Z=6$ 4 <89]ђФАth eveр( џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ]ЯEyиtџ$ 8QtџxџxџWdџ§ѓ[tџ  tџ5dџ&tџ ˜tџWdџ(Tџ]ћ@tџ5dџ‹+'єў'џ'Dџѕ:TџNdџdџ 6dџDџџєўџџˆ((xџ tџdџDџџєўD џ/ $ 4 <894 <8YЩМ<Hџ$ 8QHџrU€€€€~| ш йq I ™  qб)iЁ yЙrU€€€ џџџџџџџџ$`§џџџџџџџџџџџ8Љ`ќџџџџџџџџџџџa‰ЁС;00&$б`§џџџџџџџџџџџnЉЩс ёQa™йX P ўСlџ%$ў €A $ М<Hџ$ 8QHџxџxџW8џќ4ќјtџ58џtџW8џќ4ќјpџ58џpџW8џ((џ]ћ358џY((џ%pџўš8џќ"qLџ58џlLџqџ&lџѕЧЂlџѕЧЂlџѕЧЫ&((џ%pџўš8џ џAџ ќ4ќјlџ68џџѕlџѕЧѕ((џ%pџўš8џ ќ4ќјlџ58џlџW8џ `1\џ58џDѕѕџџџџ l\џ^ qџ'8џlџѕЊ\џM(џ@џ џ`1Tџ68џџlџW8џ`1Xџ58џtџW8џќ4ќјhџ58џhџW8џќ4ќјdџ58џєpRџRџXџ\џdџ ўџџџўџџџўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџxџW8џќ4ќјtџ58џtџW8џќ4ќјpџ58џpџW8џ((џ]ћ358џY((џ%pџўš8џќ"qLџ58џlLџqџ&lџѕЧЂlџѕЧЂlџѕЧЫ&((џ%pџўš8џ џAџ ќ4ќјlџ68џџѕlџѕЧѕ((џ%pџўš8џ ќ4ќјlџ58џlџW8џ `1\џ58џDѕѕџџџџ l\џ^ qџ'8џlџѕЊ\џM(џ@џ џ`1Tџ68џџlџW8џ`1Xџ58џtџW8џќ4ќјhџ58џhџW8џќ4ќјdџ58џєpRџRџXџ\џdџ xџW8џќ4ќј`џ58џ†:(џN8џ8џѕџ  џlTџFџћя№ў:рўћяаўlXџFРўћяАў: ўћяўѕѕ'`ўRџM€ў@Pў Pўћя@ў%`џў˜68џџ№ўаўАў`ўўPў@ўL<L4 Tџpџdџhџlџ`џtџxџ\џXџ4 Hџ8џџ№ўаўАўў`ўPў@ўМH WTџќіlџѕdџlџќ5IєќЫўdLџЙdџ§“@lџўЎTџќ4ќјhџ5Tџlllhџ JhџWTџћФ,џhџWџ €F<џ]ћ/ џћ'ќў€Fьў]hџWмўћ/Ьўћ'Мўџ6Tџџмў­ єЉ„ dџfLџ*РМ,lџhџ,Tџ,џџ џќўмўЬўМўP ўСlџ%$ў € $ aвмц№Шb