аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ` MFж€apcџџџџџџџџ4Nwж` MFжThe VBA Project џџџџџџџџ4Nwж` MFж_VBA_Projectџџџџџџџџ 4Nwж` MFж§џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџ €-џџџџџџџџ"џџџџџџџџўџџџ$%'џџџџ()*+,ўџџџBџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџMDEFGHIJKLўџџџOPQRSTUV`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџabўџџџdfџџџџghijklmnopqrstuvwxyz{|}~ўџџџRoot Entryџџџџџџџџ`ьЈЩOFжapcџџџџџџџџ4Nwж`ьЈЩOFжThe VBA Project џџџџџџџџ4Nwж`ьЈЩOFж_VBA_Projectџџџџџџџџ 4Nwж`ьЈЩOFжџџџџџџџџ§џџџ  ўџџџ ўџџџўџџџ§џџџ…џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ!&џџџџџџџџџџџџџџџџ.џџџџџџџџџџџџџџџџџџџџџџџџџџџџ/0ўџџџ23456789:;<=>?@AWџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџXYZ[\]^_eџџџџџџџџџџџџџџџџџџџџƒџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHost Project Item Names0џџџџ А‚Nwж@žЈЩOFжVBA Project Data"џџџџ Host Project Items&џџџџџџџџ4VBA Project Signature,џџџџџџџџџџџџ ўџџџўџџџ4 ўџџџўџџџўџџџ!"#$%&'()*+,-./ўџџџўџџџўџџџўџџџўџџџ7ўџџџўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЭє{рмЖThisLibrary*{рлЖ5{€мЖL{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{@мЖ L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{`мЖ";{РмЖ$={нЖ&šЄ&ЎL{801A0000-A66C-11D3-A8BD-0000861EBBD6}И@Т€V:\SW_Templates\2185\SolidWorks-ID="{D51C1A01-3B14-4846-864B-8BE5ABC7E12A}" Document=ThisLibrary/&H00000000 Module=BoundingBox Name="Macro200" HelpContextID="0" VersionCompatible32="393222000" CMG="A3A179D226D626D626D626D6" DPB="4C4E9681962B972B972B" GC="F5F72F787120722072DF" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLibrary=0, 0, 0, 0, C BoundingBox=52, 52, 898, 609, Z , 609, Z 9, Z JSџџџџS”џџџџ<џџџџџџN0{801A2вмц№000861EBBD6}ШH€ўџџџџџ џџџџ0џџџџџџџџџџbџџ@џџџџ8џџџџџџџџџџџџџџџџџџџџMakros-BMK\Begrenzungsrahmen.swp6@8rХз`6п,ўЪџџџџџџџџxџџџџЛАAЬX-ˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџThisLibraryџџџџџџџџРЉNwж@žЈЩOFжProject_Data_CurVer( џџџџ6 Host Project Item List Data8џџџџџџџџџџџџ5VBAџџџџџџџџ4Nwж@žЈЩOFжPROJECTwmџџџџџџџџџџџџJPROJECT џџџџ ЃThisLibraryџџџџ ђBoundingBoxџџџџџџџџ18ThisLibraryThisLibraryBoundingBoxBoundingBoxsrahmen?Г€0* pH‚dфMacro200Ђ,@ Z= n ѕЊи`  %J< rst@dole>stdol@e h%^*\G{000Р20430-C 0046}#2.0#0#C:\Windows\System32\e2.tlb#OLE Automation`‚nSldWorks>E€ S€CdW€GrPks€HŽ€ „€H83A33D31-27C5-11CE-BFD4€H400513BB57}#1aIProgram FileLOLIDWORKS @Corp\S†\psldwB‚U…H 2018 Type LibrarFyC€Sw_VBA_PROJECTџџџџџџџџџџџџ‚Project Item Data$џџџџ0 Control List Data$џџџџџџџџ@žЈЩOFж@žЈЩOFжReqControl List Data*џџџџџџџџ@žЈЩOFж@žЈЩOFжџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўџџџџџџџџџџџџџџџўџџџ џџџџџџџџџџџџўџџџ џџџџџџџџџџџџўџџџ(dirџџџџџџџџџџџџCReqControl List Data*џџџџџџџџџџџџ3 Control_Data_CurVer(џџџџџџџџ2 Control List Data$џџџџџџџџџџџџ1(џџџџџџџџџџџџ„ўџџџ†џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџConst>BwCZnuYtZ˜€ \Z4687F359-55D0-4CD3-B6CF-2EB42C11FШ9893-wcA У,Ч6B-Т&ant t5/l‹/ A,€/mmhand^СD0mРman€„_›@‘РС10AC1DE9F-3FBCР125-868D-7D4E9€139CCE0і1/ƒ"”2’2 'SWUtilitie­Р2U€Еi“ЊiТe‚’ЉРŸРA362E9747A-1836-436E-827F-0AE2E0081353}#7Аd7.5ƒЗщ’uР#Рs\gtswF&6+ЁL5АLb€Bт22aTHhis„QGaT@vi Libr`7ry2˜@"HеЂ1т†3“"Ђ,"ЃЪ""+ЂЃBoundinPgBoxЃB``uЅЂGi gсxЄˆЃ“Џ<'1­ъ!Ј!‡‘РС10AC1DE9F-3FBCР125-868D-7D4E9€139CCE0і1/ƒ"”2’2 'SWЬašџ фў*\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLL#Visual Basic For Applications"*\G{801A0000-A66C-11D3-A8BD-0000861EBBD6}#1a.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swvba.tlb#SolidWorks 2018 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}#1a.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldworks.tlb#SHost Project Item Names0џџџџ А‚Nwж@3 MFжVBA Project Data"џџџџ Host Project Items&џџџџџџџџ4VBA Project Signature,џџџџџџџџџџџџ ўџџџўџџџ4 ўџџџўџџџўџџџ !"#$ўџџџ&'()ўџџџ+,-./012387ўџџџўџџџўџџџ9:;<=ўџџџўџџџўџџџўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЭє{0c~%ThisLibrary*{аi~%5{g~%L{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{№i~% L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{c~%";{Pf~%$={№c~%&šЄ&ЎL{801A0000-A66C-11D3-A8BD-0000861EBBD6}И@Т€V:\SW_Templates\2185\SolidWorks-ID="{D51C1A01-3B14-4846-864B-8BE5ABC7E12A}" Document=ThisLibrary/&H00000000 Module=BoundingBox Name="Macro200" HelpContextID="0" VersionCompatible32="393222000" CMG="0604DC242CE422E822E822E822E8" DPB="0002DADDDBDDDBDD" GC="FAF820281B291B29E4" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLibrary=0, 0, 0, 0, C BoundingBox=52, 52, 898, 609, Z 98, 609, Z 9, Z SLџџџџSџџџџS”џџџџ<џџџџџџN0{801A2004-A66C-11D3-A8BD-0000861EBBD6}џџџџH€ўџџџџџ џџџџ0џџџџџџџџџџ%џџџџ@џџџџ8џџџџџџџџџџџџџџџџџџџџMakros-BMK\Begrenzungsrahmen.swp6@8rХз`6п,ўЪџџџџџџџџxџџџџЛАAЬX-ˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџThisLibraryџџџџџџџџРЉNwж@3 MFжProject_Data_CurVer( џџџџ6 Host Project Item List Data8џџџџџџџџџџџџ5VBAџџџџџџџџ4NwжPZ MFжPROJECTwmџџџџџџџџџџџџJPROJECT џџџџ ЁThisLibraryџџџџџџџџ*њBoundingBoxџџџџcЛ7ThisLibraryThisLibraryBoundingBoxBoundingBoxsrahmenrU@@@@~~vџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ бQ swApp б 0swModelR11CE-BFD4€H400513BB57}#1aIProgram FileLO?Г€0* pH‚dфMacro200Ђ,@ Z= n__SRP_2џџџџN@Project Item Data$џџџџ> Control List Data$џџџџџџџџ@3 MFж@3 MFжReqControl List Data*џџџџџџџџ@3 MFж@3 MFжldWorks 2018 Type Library*\G{4687F359-55D0-4CD3-B6CF-2EB42C11F989}#1a.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swconst.tlb#SOLIDWORKS 2018 Constant type library"*\G{0AC1DE9F-3FBC-4C25-868D-7D4E9139CCE0}#1a.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swcommands.tlb#SOLIDWORKS 2018 Commands type library>*\G{62E9747A-1836-436E-827F-0AE2E0081353}#7d7.5#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldutils\gtswUtilities.tlb#SOLIDWORKS Utilities 2015 Type Library__SRP_3џџџџџџџџџџџџ%&_VBA_PROJECTџџџџџџџџџџџџC§dirџџџџџџџџџџџџC__SRP_0џџџџ#ЉџџџџџџџџѕЊи` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ22ThisLibrary2u60d8b32dџџ+ThisLibraryџџЃЪ3џџBoundingBox2v60d8b32dџџ.BoundingBoxџџъ<'џџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџтєЃwХћ^L‘яT#ЇЗcџџџџ]‚ €]B‹_Цk№`‰џџџџџџџџH€sn8<‚Name SolidWorks;VBAїтWin16С~Win32Win64xMacГВVBA6­#VBA7Ў#Macro200цзstdole“`€__SRP_1џџџџџџџџџџџџReqControl List Data*џџџџџџџџџџџџA Control_Data_CurVer(џџџџџџџџ@ Control List Data$џџџџџџџџџџџџ?(“K*šџџџџrU@@@@~~~~~~~~(~~~$"џџџџџџџџ™ЃЋ•eяrAо_жtќ‚Ѕ фџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџAБ џџџџџџџџ0џџџџџџџџб  џџџџџџџџџџџџџџџџџџAQб1Б A Macro200 ThisLibrary BoundingBoxяРF1C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLLVBA џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџP€lІгЈН†Лж5C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swvba.tlbstdole SolidWorks џџџџџџџџџџџџџџџџџџџџџџџџp0РFC:\Windows\System32\stdole2.tlb бџџџџџџџџџџџџџџџџ1=ЃƒХ'ЮПд@ЛW8C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldworks.tlbSldWorks сџџџџџџџџЁАYѓ‡FаUгLЖЯ.Д,љ‰7C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swcoџSldWorks$SwConstœ SwCommandsœ€ SWUtilitiesѕ ThisLibraryGЉ €џџџ_Evaluateй BoundingBoxжєswAppы‘swModel[ƒ ModelDoc2Ї^swModelAзј swAssemblyJ| AssemblyDoc“‰CompNum~ѕCompNum1ї componentsУ components1;З componentљ" Component2Ђ component1Ёi`ja longstatusWErrorsЯFilnamenаFilname1’swCompП boolstatusgоmainˆ, ApplicationЅ* ActiveDocк’SendMsgToUser28.swMbInformationєswMbOkj2ClearSenst.tlbSwConst aџџџџџџџџ‘аŸоС М?%L†}N‘9Ьр:C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swcommands.tlb SwCommands Сџџџџџџџџё №ztщb6nC‚ трSFC:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldutils\gtswUtilities.tlb SWUtilities A џџџџџџџџзq  main ]ProcessBegrenzungsramen"=ЃƒХ'ЮПд@ЛWћ“Й=я€KЅФ™•œлlы VV  (@X`x€ˆ €lІгЈН†Лж€lІгЈН†Лжq Ё џџџџџџџџ&mЁ  @Begrenzungsrahmen - Gesamtbreite&mQ  4Es ist kein Teil geіffnet!.ŠQ  >Begrenzungsrahmen - Gesamtlфnge&m  &m  ZDieses Makro funktioniert nur bei Baugruppen!5=ЃƒХ'ЮПд@ЛWq+џџџџџџџџ. , &t a*o]eATбEŒКг_Вiˆф&mQ  is suppressed ˆ " Component =   [2™ Q ForceRebuild *Isometrisch&t "GetComponentCount $f &t &mQ GetComponents&t  q €Extension0SetUserPreferenceIntegerFirstFeatureName "BegrenzungsrahmenGetNextFeature8=ЃƒХ'ЮПд@ЛW RefPlane&mq' PLANESelectByID2FeatureManager .InsertGlobalBoundingBoxClearSelection2 BBOXSKETCHEditSuppress2VBE7.DLL Z  Wert=*{  d & swModel.CustomInfo2(vConfigName, vCustInfoName)  @Begrenzungsrahmen - Gesamtstфrke x ABMESSUNG Text.Š (atureManager]єInsertGlobalBoundingBox@xswGlobalBoundingBoxFitOptions_eТЏswB ѕЊи`  %J< rst@dole>stdol@e h%^*\G{000Р20430-C 0046}#2.0#0#C:\Windows\System32\e2.tlb#OLE Automation`‚nSldWorks>E€ S€CdW€GrPks€HŽ€ „€H83A33D31-27C5-11CE-BFD4€H400513BB57}#1aIProgram FileLOLIDWORKS @Corp\S†\psldwB‚U…H 2018 Type LibrarFyC€SwConst>BwCZnuYtZ˜€ \Z4687F359-55D0-4CD3-B6CF-2EB42C11FШ9893-wcA У,Ч6B-Т&ant t5/l‹/ A,€/mmhand^СD0mРman€„_›@‘РС10AC1DE9F-3FBCР125-868D-7D4E9€139CCE0і1/ƒ"”2’2 'SWlection2Ј§ swModelDocExtЈs ExtensionыGetType)J swDocASSEMBLY…nGetComponentCountхЌ GetComponentsРц GetModelDoc2^ЧGetSuppressionТ swDocPARTЮMName2­П GetPathName ActivateDoc3ш7swRebuildOnActivation_eЌswUserDecisionЫіProcessBegrenzungsramenшm ForceRebuildoShowNamedView2>|ViewZoomtofit2цЄSaveAsf;CloseDoc еSave2RЩEbene1зŸEbene2иŸEbene3йŸPartє~ FeatureNameЄПFeature!>swFeatчи PlaneCountQ Abmessung_neuxпvConfigNameArrbJretValЭ; vConfigNameŸvCustInfoNameArr~ќ vCustInfoNameЋMstri^5MaпA)BMaпB*BMaпC+BSetUserPreferenceIntegerKswUserPreferenceIntegerValue_e+3swUnitsLinearDecimalPlacesh~swUnitsMassPropDecimalPlacesВч swUnitSystemxБswUnitSystem_e9ЬswUnitSystem_MMGSo- FirstFeatureaнGetNextFeatureХ; GetTypeNameoш SelectByID2юЙFeatureManager]єInsertGlobalBoundingBox@xswGlobalBoundingBoxFitOptions_eТЏswBoundingBoxType_CustomPlaneЗo EditSuppress2р’GetConfigurationNamesИ/swConfigуGetActiveConfigurationUџ configName–ПGetCustomInfoNames2яoIsEmpty љGetCustomInfoValueЉ‰ CustomInfo2Х– AddCustomInfoLИџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџ"џџ$џџ&џџ(џџ+џџџџџџ/$F9ф893-wcA У,Ч6ƒB-Т&ant t/l‹/ A,€/mma4nd^СD0m`man€„_› @‘РС10AC1DE9F-3FBCР125-868D-7D4E91Р39CCE0і1ƒ"”2’2 'SWU№‚дџџџџŽ6'22ъџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP<џџ<џџ<џџ<џџ<џџ <0џџ<8џџ<џџџџџџ(""OR"4ig":ke"F"œџџџџ№ „0џџџџџџџџџџџџ% „2џџџџџџџџџџџџ8% „6џџџџџџџџџџџџX% „8џџџџџџџџџџџџx%`„<џџџџџџџџџџџџџџ`„>џџџџџџџџџџџџџџ`„@џџџџџџџџџџџџ џџ`„Bџџџџџџџџџџџџ џџ „Dџџџџџџџџџџџџј% „Hџџџџџџџџџџџџ%`„Jџџџџџџџџџџџџџџ`„Lџџџџџџџџџџџџџџ`„Nџџџџџџџџџџџџџџ`„Pџџџџџџџџџџџџџџ`„Rџџџџџџџџџџџџџџ`„Tџџџџџџџџџџџџџџ „VџџџџџџџџџџџџШ%`„Xџџџџџџџџџџџџ џџ Z@џџџџџџџџџџџџџџџџџџџџџџџџџџџџM„ „џџџџџџџџџџџџџџџџџџџџ˜џџџџџџџџv„)ƒ0џџџџџџџџџџџџИР€%)ƒ2џџџџџџџџџџџџрџџџџ€%`„’џџџџџџџџџџџџџџ`„”џџџџџџџџџџџџџџ`„–џџџџџџџџџџџџџџ`„.џџџџџџџџџџџџ џџ`„˜џџџџџџџџџџџџ џџ`„Xџџџџџџџџџџџџ џџ`„šџџџџџџџџџџџџџџ`„œџџџџџџџџџџџџ џџ`„џџџџџџџџџџџџџџ „žџџџџџџџџџџџџи %`„ џџџџџџџџџџџџџџ`„Ђџџџџџџџџџџџџџџ`„Єџџџџџџџџџџџџ џџ`„Іџџџџџџџџџџџџ џџ`„Јџџџџџџџџџџџџ џџ`„Њџџџџџџџџџџџџ џџ`„Ќџџџџџџџџџџџџ џџ`„Ўџџџџџџџџџџџџџџ`„Аџџџџџџџџџџџџџџ`„Вџџџџџџџџџџџџџџ`„Дџџџџџџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџпўЪп€ RР€ bx€ žp€ Ъ€ X€ Z€ 6р€ џџџџ€ џџџџ€ € € € 0€ @€ P€ `€ p€ €€ €  € А€ Р€ а€ р€ №€ € € џџџџ" (8€ џџџџ€ џџџџ€ $H p0€АИ€ џџџџ Ра€ џџџџ€ $рD hp€ џџџџ x€ џџџџ€ Rˆр№€ џџџџ(8H $`ˆ€ h ј@ H"X€ *€А Ра №€ 48Ph€ џџџџxˆ˜ЈИар№$0€ $8 `"p€ *˜Ш иш € 4Ph€ ˆ ˜  ЈИШ€ џџџџ",а€ џџџџ€ №€ € € € 0€ @€ P€ `€ p€ €€ €  € А€ Р€ а€ р€ №€ €  € € 0 € џџџџ€ џџџџ@ € dP "И "р & € џџџџ€ 20 h € џџџџ x  ˆ  ˜ И Р  Ш а р € џџџџ€ ш   € џџџџ€ ( @ € џџџџ P  ` x  ˆ € џџџџ ˜ Ј А € џџџџ И Ш а € џџџџ и ш №  ј   € : 8X € ˜ $(  P N`  А  Р а € џџџџ€ :и  ( 8HXp €(:И€ џџџџ,ј(€ @X€ џџџџ,`€ ЈР€ џџџџ,Шј€ ( 08@€ џџџџ&H€ p€ џџџџ€ P€ `р€ џџџџ€ J@(€ џџџџИ€ џџџџџџџџш]ѕD]ѕD З]ѕD@ ]ѕD`U]ѕD€a]ѕD˜s]ѕDА]ѕDШ3]ѕDр]ѕD]ѕD ]ѕD8]ѕDP]ѕDh]ѕD€]ѕD˜]ѕDА]ѕDа–ш№ \!".0№ 0!^.2у---Ist ein Dokument geіffnet? 2ВœЙEs ist kein Teil geіffnet! b d 0B@`|џџHkџџ@К 2B@f№ 2!j.hу---Ist ein Baugruppe geіffnet?ј 2!l nœЙ-Dieses Makro funktioniert nur bei Baugruppen! b d 0B@`|џџkџџˆ№ 2.8уL---Get number of components, not including child components in subassembliesК 8%p'< <Ќ '<К 8%r'@ JЌ <’№ J$@.D№ D!t.6 D%vЌœ[м D!Й is suppressed йdџџpу a---open part from assembly function (if subassembly, create another for-loop with same procedure) 6!l xœ[мЙ Component = D!zЙ [ D!|Й]й D!|'R№ RК €!‚ P 0%~.2у#---Insert GlobalBoundingBox on part 0 2A@„ 2!†'XЙ *IsometrischЌ 2B@ˆ 2B@Šу----save and close part, back to main assembly D!| 2B@Œ D!| 0B@Ž№ 0!^.2 6!l neК 6%p'> >Ќ '>К 6%r'B LЌ >’№ L$B.H№ H!t.6 H%vЌœ[м H!Й is suppressed йdџџШу---open part from subassembly H!|'T№ TК €!‚ P 0%~.2у#---Insert GlobalBoundingBox on part 0 2A@„ 2!†'XЙ *IsometrischЌ 2B@ˆ 2B@Šу----save and close part, back to main assembly H!| 2B@Œ H!| 0B@Žkџџx LЫkџџ`kџџX JЫК 2B@oџџ0І –@]ѕDш(]ѕD(]ѕD(]ѕD0(]ѕDH(]ѕD`(]ѕDx(]ѕD(]ѕDЈ(]ѕDР(]ѕDр(]ѕDј(]ѕD(]ѕD(!]ѕD@(]ѕDX(]ѕDp(]ѕDˆ(]ѕD (]ѕDИ(]ѕDа(№ 0!^.˜у^-----in den Dokumenteneigenschaften die Einheiten auf MMGS (Millimeter, Gramm, Sekunde) setzen И!КЌЌ ˜!j%Ж'X И!МЌЌ ˜!j%Ж'X И!ОЌ Р!Т ˜!j%Ж'Xу+-----gibt es schon einen Begrenzungsrahmen?№ ˜!Ф.œ œВb œ!'š šЙBegrenzungsrahmenœ š'xџџ8kџџ0№ œ%Ц.œМџџу-----Wenn nicht dann Йœу"-----Name der Ebene Oben ermitteln№ 2!Ф.ž žВbЙRefPlane ž!Шœ  Ќ '  ž!'š  Ќœ š'’kџџH  Ќœ š'”kџџ(  Ќœ š'–kџџkџџ№ ž!Ц.žМџџшу3-----dann Begrenzungsrahmen auf Ebene Oben einfќgen ”ЙPLANEЌЌЌКЌВЌ ˜!j%Ъ 'Xу’Set BoundingBox = Part.FeatureManager.InsertGlobalBoundingBox(swGlobalBoundingBoxFitOptions_e.swBoundingBoxType_BestFit, False, False, longstatus)№ а!вКК N ˜!Ь%Ю..К ˜B@fЙBegrenzungsrahmenЙ BBOXSKETCHЌЌЌКЌВЌ ˜!j%Ъ 'X ˜B@дК ˜B@fkџџ(у4-----Abmessung aus den Konfig-Eigenschaften auslesen 2!ж'Є№ 2!к.и и!'м Ј Є“ Ј 2%о'Њ Њ$рœ Ќ Њ“ ЌЙ Wert= Ј Ќ 2%т 'ЎЙ2 & swModel.CustomInfo2(vConfigName, vCustInfoName)'d ЌЙBegrenzungsrahmen - Gesamtlфngeœ Ј Ќ 2%ф'Ау MsgBox MaпAkџџ  ЌЙ Begrenzungsrahmen - Gesamtbreiteœ Ј Ќ 2%ф'Ву MsgBUtilitie­Р2U€Еi“ЊiТe‚’ЉРŸРA362E9747A-1836-436E-827F-0AE2E0081353}#7Аd7.5ƒЗщ’uР#Рs\gtswF&6+ЁL5АLb€Bт22aTHhis„QGaT@vi Libr`7ry2˜@"HеЂ1т†;“"Ђ,"ЃЪ""+ЂЃBoundinPgBoxЃB``uЅЂGi gсxЄˆЃ“ЏУ)1­ъ!Ј!‡џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџrU@@@џџџџџџџџџџџџ 8ё`§џџџџџџџџџџџџџџџџџџџ`a`§џџџџџџџџџџџџџџџџџџџёQЬašџ фў*\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLL#Visual Basic For Applications"*\G{801A0000-A66C-11D3-A8BD-0000861EBBD6}#1a.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swvba.tlb#SolidWorks 2018 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}#1a.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldworks.tlb#SldWorks 2018 Type Library*\G{4687F359-55D0-4CD3-B6CF-2EB42C11F989}#1a.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swconst.tlb#SOLIDWORKS 2018 Constant type library"*\G{0AC1DE9F-3FBC-4C25-868D-7D4E9139CCE0}#1a.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swcommands.tlb#SOLIDWORKS 2018 Commands type library>*\G{62E9747A-1836-436E-827F-0AE2E0081353}#7d7.5#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldutils\gtswUtilities.tlb#SOLIDWORKS Utilities 2015 Type LibraryџџџџџџѕЊи` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ22ThisLibrary0760d8b1c5џџ+ThisLibraryџџЃЪ;џџBoundingBox2o60d8b1f1џџ.BoundingBoxџџъУ)џџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџfŸТ[RMMŠTнPn „џџџџДrљ{зЯB‹ТэЪdП™ѕџџџџџџџџH€wr=‚Name SolidWorks; VBAїтWin16С~Win32Win64xMacГВVBA6­#VBA7Ў# Macro200цзstdole“`ˆ џSldWorks$SwConstœ SwCommandsœ€ SWUtilitiesѕ ThisLibraryGЉ €џџџ_Evaluateй BoundingBoxжєswAppы‘swModel[ƒ ModelDoc2Ї^swModelAзј swAssemblyJ| AssemblyDoc“‰CompNum~ѕCompNum1ї componentsУ components1;З componentљ" Component2Ђ component1Ёi`ja longstatusWErrorsЯFilnamenаFilname1’swCompП boolstatusgоЌ(mainˆ, ApplicationЅ* ActiveDocк’SendMsgToUser28.swMbInformationєswMbOkj2ClearSelection2Ј§ swModelDocExtЈs ExtensionыGetType)J swDocASSEMBLY…nGetComponentCountхЌ GetComponentsРц GetModelDoc2^ЧGetSuppressionТ swDocPARTЮMName2­П GetPathName ActivateDoc3ш7swRebuildOnActivation_eЌswUserDecisionЫіЌ(ProcessBegrenzungsramenшm ForceRebuildoShowNamedView2>|ViewZoomtofit2цЄSaveAsf;CloseDoc еSave2RЩEbene1зŸEbene2иŸEbene3йŸPartє~ FeatureNameЄПFeature!>swFeatчи PlaneCountQ Abmessung_neuxпvConfigNameArrbJretValЭ; vConfigNameŸvCustInfoNameArr~ќ vCustInfoNameЋMstri^5MaпA)BMaпB*BMaпC+BSetUserPreferenceIntegerKswUserPreferenceIntegerValue_e+3swUnitsLinearDecimalPlacesh~swUnitsMassPropDecimalPlacesВч swUnitSystemxБswUnitSystem_e9ЬswUnitSystem_MMGSo- FirstFeatureaнGetNextFeatureХ; GetTypeNameoш SelectByID2юЙFeatureManager]єInsertGlobalBoundingBox@xswGlobalBoundingBoxFitOptions_eТЏswBoundingBoxType_CustomPlaneЗo EditSuppress2р’GetConfigurationNamesИ/swConfigуGetActiveConfigurationUџ configName–ПGetCustomInfoNames2яoIsEmpty љGetCustomInfoValueЉ‰ CustomInfo2Х– AddCustomInfoLИ€џџџ_B_var_swModelDocExtFG€џџџ_B_var_swConfigžК€џџџ_B_var_configNameС- €џџџ_B_var_Textџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџ"џџ$џџ&џџ(џџ+џџџџџџ/$Й^Б^bџџџџџџџџџџџџџџџџџџџџџџ№кдџџџџс522ЃЪџџ#ˆЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(rU@@@@~xџџџџџџџџ;!сQaQ A!"$Q%б Q  Q‘aQС!QБё Б‘С#(‘Q-A1%С%A&‘&С&!'ёq'Ё'Q))С)**б*!+-Б.aa0Б01б0М 8 gg4ŸјџџџпZєp˜јџџџURОјџџџg6Ÿјџџџ.є8˜јџџџURОјџџџg(ь&ЧОg,Ÿ№џџџ№№ї.єЈg{ggэџџ.є€g(Ÿјџџџ.є№eјџџџПиџџџg0Ÿ№џџџ.єр’№џџџ№PЧjg,Ÿ№џџџ№№ї.єЈg{gg(URg2Ÿ№џџџэџџ.єш’№џџџ†A g! qЯA g0ŸРџџџэџџ.є№–РџџџF(g&p/h! †Аџџџ g:/hЖ@/(цРџџџVRXМРџџџg6Ÿјџџџ.XєP˜јџџџURОјџџџg0Ÿ№џџџ.Xє@’№џџџ№?ЧgBŸџџџ.Xє(—џџџїPgˆџџџb^ыџџџˆџџџЦ№gg0Ÿ№џџџ.єр’№џџџ№?Ч’gŽŸџџџ.Xє(Ÿ€џџџ.Xє`ї—џџџPgˆџџџїPgxџџџ—€џџџPgpџџџїPghџџџb^ы џџџˆџџџxџџџ€џџџpџџџhџџџg,Ÿџџџ.Xє`"џџџGxgTŸјџџџ/p№эџџ'x.є0 ˜јџџџURОјџџџh //g*.бРџџџлAМРџџџg №ї.єX g.є€ g>Ÿ`џџџŸџџџ.Xє`—џџџ.єР Нџџџg8Ÿџџџ.Xє`—џџџ.єˆ Нџџџg6Ÿјџџџ.є8˜јџџџURОјџџџЦъg0Ÿ№џџџ.єр’№џџџ№?Чъg4ю˜џџџ.вРџџџŠA"МРџџџg!"qЯA"g,ю˜џџџ.вРџџџF@g&p/j!"†8џџџъg:/jЖ@/@цРџџџVR`МРџџџg6Ÿјџџџ.`єP˜јџџџURОјџџџg0Ÿ№џџџ.`є@’№џџџ№?ЧNgBŸџџџ.`є(—џџџїPgˆџџџb^ыџџџˆџџџЦЪgg,Ÿџџџ.`є`"џџџG€gTŸјџџџ/p№эџџ'€.є0 ˜јџџџURОјџџџh //g*.бРџџџлAМРџџџg №ї.єX g.є€ g>Ÿ`џџџŸџџџ.`є`—џџџ.єР Нџџџg8Ÿџџџ.`є`—џџџ.єˆ Нџџџgg/jЄ8џџџfggg/hЄАџџџ4g Ÿ№џџџэџџ.єр g{Ш8 @иџџџDџџџˆџџџ€џџџxџџџpџџџhџџџјџџџРџџџо Ьgg$Ÿџџџює8eџџџТиџџџgRљшўџџ1јИўџџјˆўџџžиџџџбXўџџ#’@ўџџ$лБаџџџъXўџџ@ўџџgRљшўџџјИўџџјˆўџџžиџџџбXўџџ#’@ўџџ$лБаџџџъXўџџ@ўџџgTљшўџџјИўџџљˆўџџžиџџџбXўџџ#’@ўџџ$лБаџџџъXўџџ@ўџџh"žиџџџбXўџџ%ДИРџџџМXўџџg˜Рџџџь& Чшg"žРџџџбXўџџ&`ЗШџџџМXўџџg—Шџџџї'DЧДg—ШџџџФИџџџg Цшgg"žРџџџбXўџџ(ДИРџџџМXўџџg ЦDg—Иџџџї)DЧHg.ŸџџџюєР˜џџџU*ТАџџџОџџџg˜Аџџџь& ЧŠg0ї+Ÿ8ўџџžАџџџєh—8ўџџDН8ўџџЧJg’Јџџџ№ФВЈџџџg$Ÿ8ўџџžАџџџє8"8ўџџЗШџџџg’Јџџџ№?Чрg—ШџџџФјџџџgg’Јџџџ№?Чg—ШџџџФ№џџџgg’Јџџџ№?ЧDg—ШџџџФшџџџggg.ŸџџџžАџџџєX˜џџџU*ТАџџџОџџџg Ц.gŽŸ№џџџЖ@ўаўџџ,ј ўџџјpўџџјўџџюи§џџјЈ§џџьrXўџџј`§џџžиџџџб@ўџџ#’0§џџ- лБаџџџъXўџџ@ўџџ0§џџg\љшўџџяИўџџяˆўџџ/lЖ@žиџџџбXўџџ.’@ўџџ/ДИрџџџъXўџџ@ўџџgюшўџџžиџџџа0gŽўшўџџ'ўИўџџ1јˆўџџј ўџџј№§џџяР§џџј§џџьrXўџџјH§џџžиџџџб@ўox MaпBkџџ8 ЌЙ Begrenzungsrahmen - Gesamtstфrkeœ Ј Ќ 2%ф'Ду MsgBox MaпCkџџаЪШkџџРЪИ ВЙx ДЙx А'ЂуMsgBox Abmessung_neuуJ----schreibt die Abmessung in die Konfigurationsspezifischen EigenschaftenуYretVal = swModel.AddCustomInfo3(configName, "ABMESSUNG", swCustomInfoText, Abmessung_neu)уC----schreibt die Abmessung in die Benutzerdefinierten EigenschaftenЙ ABMESSUNGЙText Ђ 2%ц'Іoџџ@уKMakro іffnet aus einer Baugruppe und deren Unterbaugruppen alle EinzelteileуSist ein Einzelteil merfach in der Baugruppe enthalten wird es auch merfach geіffnet die Aу\erstellt in den Einzelteilen den Begrenzungsrahmen um die Aussenmaпe X, Y und Z zu ermittelntzerdeу/gestartet wird das Makro von der HauptbaugruppeltуRunterdrќckte Teile erden nicht geіffnet und erhalten auch keinen Begrenzungsrahmenу—erstellt in den benutzerdefinierten Eigenschaften der Einzelteile einen neuen Eintrag mit dem Namen "ABMESSUNG" und trфgt die Aussenmaпe X, Y und Z einуУrotationssymmetrische Bauteile erhalten auch den Begrenzungsrahmen fќr die Aussenmaпe X, Y und Z (nicht so gut da dann in der "ABMESSUNG" X, Y und Z steht und nicht der Durchmesser und die Lфnge)џџџџ џџџџHЗAttribute VB_Name = "BoundingBox" 'Makro іffnet aus einer Bau€gruppe b deren U nterb0n alle EinzelteileЂerstellаt in8n !BegNzung srahmYum die Aussenmaпe X, YzZ z€u ermitTnbbenutzerdefiniertSEigeРnschaf€`ƒ D‚rn neu‚Рntrag €1Xm –n "ABMESSUNG"СDtrфgtS€›„Nrotatio€nssymmeУ€BeЈ‚’fha˜1€Ÿuch‚ˆfќr5(nicht@ so guIa  dannЗrŠ[?HQРd€ sDDulrcР_]r‚8С`L фnge)D2uA| drќckР‘TСxЭ@/d€LУgeФ”er‰5k‘n N61ist`ˆd mperfaDB  entDwird |es€ЉР Х !Dgesta€t B das ƒИvoAŸ€r HauptFБC IDim swAppЧФAs SldWorks.У C ModelЦ I BDoc2-Ž AХ ž Ahmb|ly ‰ EЧCАompN@дш Iр8Јgern1ycр4on /sЃVaрriantчgC џz„ `†)ab ш#f {Є§iф Хрюjё lo’ w` Ђ рL@‡Error„!!Filn/!­Т€SРng'gDD PswЁ"eC…Oё%boo*l`^tшB@eaЂЅCSub mahin(${S€Нƒ\=т @]lic"–Œ[ЃBX Чт.ActiveNУ Ѓ'--„-I{Doku Л”t Хs?cIf€k# Is NothсРб TheDЛС SendMsgToUser2 "иEs Ё†‹ A‘& !",a bInf˜ormтOkcСa Exit   #РEnd IfЇ#sw.Clea rSele@onр2 Trudл" јExtТ"Ѓ рЭРО/Э Щ"Чъя"(хGeШtTy я<>рр ASSEMBLY†)џ$р$Dies`ЄaƒžfunkЁh1q €nur bei‘hѕГ}nЏnЏЏЇДЛsvJ=ё!Qф s'А pmb †ofB чC, noƒcluŠ chil†dјбmsubaЃPП #ё0БNх.0хv2Ct(”/ё•- 1Узг.Г*yњsЙ „ For i00 To~ d#f'(іiЊ82$AaR _дQ,4F!S@šrШess€'()№0Ъ41Debug.€Print (з‘RЁ+ "p5 sded"t ElsO”/б11op€p@v from 4Œy Р&3 (iP>Цy, creaаte a0hp: -loop zth s!SproceИdurЅ‡ѕїBAб‡r1С@PART1ѓU " "Rfё`АT &—%.Q2" ["Š`$PatТhR& "]Г5ћq_=јh3 ƒ2?bАƒNUр 3(m,BGБ8RА 0Ondp_e.sw!QQDeci, OЃi˜EёInTt€ Global(Р. ‘ao Pбssџк›qК Bй=ЈhAхr.а1ced ЏEOShowЁdVi„ew`L*IsoХГ^7Ÿ•ZooРmtofit˜2)savс'Elose Q, bac№k to‚qV, џ0рz4ЈЏ0PuРdП "бп"p=wŸ… Яё:3Ёпsw0я…d_3"”K1’)В27џaв3ОT…qШІ–UЫ‰іGsmp‚LVћзVjр ‰VФ[)БЯqІ‘x(jяђћШКX1БGP/&ВџpїёŸYkŽRH_ZъnРЗ1J oZ/ В%[§Е '---open part from subassembly д Filname1 = component1.GetPathN2tSet swModel=swApp.ActivateDoc3([, True,,Reb@uildOn'ion_e.swUserDecis, ErrorLs)yvIn€t GlobalBoundingB0ox oƒ—ProcessBegrenzungsњr€snO€`Ri—boolstat us{‚.Forceo—.ShowЎdView2 "*Isometrisch", 7Ÿ Zoo€mtofit2з Jsave an€d closeBˆ, back t€o main п‰УF.РAs (‹иl]У‡CA ‡*›E€.IfЯ8Next joЫЭ ЩТ iУ Щ32 (Ј/A SubP € U‹_p ( жТ6 €ESldWorkєs.,‡Т‰ BC2 @C&Dimр EbenРфэЂi EngL26V3_Ј m` ObjшectP’— /M(l  B€pea’nЧ Fe rreЁj§uSL&Dвж ч„@­ swс фаAХF$ˆ'lanešC ›t€LoЩ@Abm`›€š_neuД Ь vConfФigAArro` @Varianˆ:rрetValѓ Ž 0 !@pustI˜nfoд‘vChѕ !ms€!’„р с :MaпA_ бЧ8э@B_MC_&ГїSyR7=3mSy1yѓR'А‚--`_d№‚D0okum@GigDenhaftpdie Einheiбauf MMGS (Mill‚iАjer, G€s@m, Sekрwe€) setze49cZrб.Ex~.ƒ Prefe0xceIntegeœr(“€~ &ueƒ‚nitsLineaђ‚malPlaа|, 0, 3\ŸЏЏЏBˆЏalЉіMrapСŠЯёЯЯЯЯё{SysŒteрswU€vфa„ё)g€ibt es @ЅP’e`n jh >?A$фH`ŽFirst*JЃDo While NoЄt 5Isсh*пБД!=0д.сƒГ11IfeЄ"^ №" ThЅ&eq˜Ћ1Exit ќDo‹‰‚AћЕ €Б Q„ф(tLoopлгƒ6Wenn nicht da~nф1 Е Љ yђd$erг€ O0 e€rmittelTнA sѓeБ>….kO*q   "ˆRef€5ne"pуу1СTypvПЁУj= Ш+ 1џSѓS$D4бЏя!` 1!“T§4•=Љ%ŸС­ fї_Ё§2џђў2w0Пхџ•sџ{q§3џуTђ3ЯџJТџ =œ)џб$Ш3Sџџ#’0§џџ- лБаџџџъXўџџ@ўџџ0§џџgžиџџџа2gюшўџџžиџџџа0gg$ŸXўџџюєX–XўџџЖˆџџџg$Ÿџџџює eџџџП§џџgŸ§џџ‘Xўџџ&Жшќџџg–ˆџџџŸXџџџМШќџџ<g6ŸXўџџ–Xџџџa8ўџџюєј –XўџџЖ@џџџН8ўџџgŸ@џџџё  Ч g–@џџџŸ(џџџМЈќџџ gz–(џџџўшўџџ3ШXўџџŸ˜ќџџ–(џџџa ќџџ–Xџџџa8ўџџюєh!"˜ќџџq@ўџџШ0§џџ`З џџџы8ўџџ ќџџъXўџџ@ўџџ0§џџgўшўџџ4У€ќџџg–(џџџўшўџџ5ХKЧ,gHŸ˜ќџџ–(џџџa ќџџ–Xџџџa8ўџџюєи!"˜ќџџЗџџџы8ўџџ ќџџgg–(џџџўшўџџ6ХKЧ˜gHŸ˜ќџџ–(џџџa ќџџ–Xџџџa8ўџџюєи!"˜ќџџЗџџџы8ўџџ ќџџgg–(џџџўшўџџ7ХKЧgHŸ˜ќџџ–(џџџa ќџџ–Xџџџa8ўџџюєи!"˜ќџџЗџџџы8ўџџ ќџџggŸ(џџџПЈќџџ8ggŸXџџџПШќџџЬgP—џџџї8Pg8ўџџ—џџџPg ќџџї8Pg˜ќџџ—џџџPЗ џџџы8ўџџ ќџџ˜ќџџg8Ÿxќџџ— џџџї9ї:ює0 "‘xќџџ[шўџџЖpџџџg{ˆЬдАШќџџЈќџџрќџџРќџџИџџџРџџџˆџџџШџџџиџџџ§џџшќџџрџџџАџџџјџџџ џџџ№џџџџџџшџџџџџџџџџ(џџџ€ќџџpџџџ џџџ@џџџXџџџ>8ўџџ ќџџ˜ќџџџџџXўџџ@ўџџ0§џџ aS б"a WerНБt=" + swModel.GetCustomInfoValue(vConfig€Name, vtCl8) Text = " ж&Єž2–"LmIf …nBegrenzungsrahmen - Gesamtlфnge" Th enNRMaпA#‚ЄX—''Msg0Box +“Enpd If“ “ +{bP№’ д№џџџџЁ Н)22ъџџЖџџџџџџџџ˜џџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџаџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@1”џџ1”џџ1”џџ1”џџ!”џџ > џџџџ”џџџџLџџџџPџџџџLџџџџPџџџџџџџџџџџџLџџџџџџџџPџџџџLџџџџPџџџџLџџџџџџџџџџџџџџџџPџџџџLџџџџџџџџџџџџ<иџџ<рџџ<шџџ<№џџ<јџџ<џџџџџџ("""4џџ":џџ"F"œ(% %@2bdn8<%`јџџџџџџџ џџ %р№џџџџџџџџџ %т€@(џџџџ џџ@џџџџџџџџЂ€E8Xџџџџј@џџџџџџџџиџџџџџџџ џџ% Ћ33Q2I 1hB Є0infќ/kзЏWЉWlPЉByID2(B2, Р"PLANE№жU#sъАLЁK`eЈT'/A АP.Р­.Є,Maєna@l.“щŽщРm>@FitOpt@яsGR\ИЁ6_Be№Vi€t, Falsєb{Г, longstatus) Set BoundingBox = Part.FeœreManager.InsertGloba"lZ(sw&FitOptions _e.swZType_CustomPlane, pFalsŸClearSelecX2 TrueaТboolзНE xtensƒ.4ByID2("B€egrenzuƒrahmen", "BBOXSKETCH€0, ‡„LNoth€ ˆš‚JEditSuppress2GœXEnd Ifƒ'-Abm€#€M aus den Konfi g-Eigfch afjlesenvC‚NameArrswModel.GetБ ura™sУ YA|swCK AАРџџџџџџџ џџ %т€NШlџџџџџџ @џџџџџџџџт€Rјxџџџџџџ@џџџџџџџџЂ€W(ˆџџџџШ@џџџџџџџџаD6xR€P%џџџџИџџџџџџџџџ Z@`џџџџџџџџџџџџ8џџџHџџџџџџџџџџMM„ „џџџџ`џџџџџџџџџџџџxќџџH˜џџџџџџvv`„)ƒ1џџџџџџџџИР€%)ƒ3˜џџџџрџџџџ€%`„’џџџџјџџџџџџџџџ`„”џџџџ№џџџџџџџџџ`„–џџџџшџџџџџџџџџ`„.џџџџрџџџџџџџ џџ`„˜џџџџиџџџџџџџ џџ`„Xшаџџџџџџџ џџ`„šHШџџџџџџџџџ`„œџџџџРџџџџџџџ џџ`„џџџџИџџџџџџџџџ „Ÿ`Аџџџџџџџи %`„ џџџџЈџџџџџџџџџ`„Ђ џџџџџџџџџ`„Єџџџџˆџџџџџџџ џџ`„Ірpџџџџџџџ џџ`„ЈџџџџXџџџџџџџ џџ`„Њџџџџ@џџџџџџџ џџ`„ЌР(џџџџџџџ џџ`„ЎX џџџџџџџџџ`„Аџџџџџџџџџ`„Вџџџџџџџџџџџџџ`„ДpџџџџџџџџџЂ€1џџџџ@џџџџџџџџЂ€3Hџџџџ8@џџџџџџџџЂ€7xџџџџX@џџџџџџџџЂ€9Јџџџџx@џџџџџџџџт€<и џџџџџџ@џџџџџџџџт€>€"џџџџџџ@џџџџџџџџт€BА@џџџџ џџ@џџџџџџџџЂ€Ih`џџџџ @џџџџџџџџт€J˜hџџџџџџ @џџџџџџџџт€L jџџџџџџ @џџџџџџџџт€PPpџџџџџџ @џџџџџџџџт€T€€џџџџџџ@џџџџџџџџт€Xџџџџџџџџ џџ@џџџџџџџџшШџџџџџџџџјџџџџh˜ЈP€xџџџџџџџџ8џџџџџџџџ€@( џџџџшиАџџџџџџџџHџџџџƒ.џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№шџџџџшџџџџџџџџџџџџ@џџџџ(џџџџџџџџџџџџџџџџџџџџи џџџџџџџџџџџџџџџџџџџџџџџџџџџџXѕЊи` *\R3*#18c*\R3*#214*\R3*#192*\R3*#217$*\Rffff*2o60d8b1f1*\R3*#193*\R1*#3*\R1*#0*\R3*#0*\R3*#0*\R3*#11*\R4*#77*\R4*#78*\R3*#11*\R4*#1*\R3*#b1*\R3*#b1*\R3*#30*\R3*#30*\R4*#1a2*\R4*#47*\R4*#1da*\R3*#2e*\R3*#2e*\R4*#335*\R0*#14пўЪж€ € € € 0€ @€ P€ `€ p€ €€ €  € А€ Р€ а€ р€ №€ € € џџџџ" 4(68€ џџџџ€ џџџџ€ $И H0,Xˆ€ џџџџ ˜(Ј€ џџџџ€ $`0рD,ј@H€ џџџџ P€ џџџџ€ R82ˆ˜0Ј€ џџџџ&И:а6р0№ $B 0€ h№ 0@Ž  ,р"T№€ *h  *( 8 X€ 4И>˜8А6Ш€ џџџџ6и4шј,&:06@0P$Bh € $  ,˜"TЈ€ *ƒ а *р № € 4H>H8`x € ˜   АР€ џџџџ",Ш€ џџџџ€ ш€ ј€ € € (€ 8€ H€ X€ h€ x€ ˆ€ ˜€ Ј€ И€ Ш€ и€ ш€ ј€ € € (€ џџџџ€ џџџџ$8€ dX"R€"RЈ&Tа€ џџџџ€ 2јƒ"0 € џџџџ @  "P  ` €  ˆ   "˜  Ј € џџџџ€ А  а € џџџџ€ (р . € џџџџ   0( @  $P € џџџџ ` p x € џџџџ €  ˜ € џџџџ   А И  Р .Ш  и € :р 8Ž € ˜X $\№   NŽ(  x  ˆ ˜ € џџџџ€ :   $р $№    6 8  H (zX :€ € џџџџ,Р H№ €  € џџџџ,(HX€ pˆ€ џџџџ,HР€ и№ ј€ џџџџ&P€ 8€ џџџџ€ Ph€ `Ј€ џџџџ€ JX(88€ џџџџ`€ џџџџџџџџШ]ѕDш_Te]ѕDes\]ѕDHSol]ѕDxks-]ѕDЈs-B]ѕDиgre]ѕD€sra]ѕDswp]ѕDА]ѕD8]ѕDh]ѕD˜]ѕD ]ѕDШ]ѕDP]ѕDј]ѕD€]ѕD(–ш№ \!".0№ 0!^.2 2ВœЙEs ist kein Teil geіffnet! b d 0B@`|џџPkџџHК 2B@f№ 2!j.hу---Ist ein Dokument geіffnet? 2!l nœЙ-Dieses Makro funktioniert nur bei Baugruppen! b d 0B@`|џџ˜kџџ№ 2.8у---Ist ein Baugruppe geіffnet?inclК 8%p'< <Ќ '<К 8%r'@ JЌ <’№ J$@.D№ D!t.6 D%vЌœ[м D!Й is suppressed йdџџ€уL---Get number of components, not including child components in subassembliesth sam 6!l xœ[мЙ Component = D!zЙ [ D!|Й]й D!|'R№ RК €!‚ P 0%~.2 0 2A@„ 2!†'XЙ *IsometrischЌ 2B@ˆ 2B@Šу#---Insert GlobalBoundingBox on partsembly D!| 2B@Œ D!| 0B@Ž№ 0!^.2 6!l neК 6%p'> >Ќ '>К 6%r'B LЌ >’№ L$B.H№ H!t.6 H%vЌœ[м H!Й is suppressed йdџџш H!|'T№ TК €!‚ P 0%~.2 0 2A@„ 2!†'XЙ *IsometrischЌ 2B@ˆ 2B@Šу---open part from subassemblyain H!| 2B@Œ H!| 0B@ŽkџџА LЫkџџ˜kџџ JЫК 2B@oџџhІ –@]ѕDш(]ѕD(]ѕD(]ѕD0(]ѕDH(ј]ѕD`(]ѕDx(]ѕD(]ѕDЈ(]ѕDР(]ѕDр(]ѕDј(]ѕD(]ѕD(!]ѕD@(]ѕDX(]ѕDp(]ѕDˆ(]ѕD (]ѕDИ(]ѕDа(№ 0!^.˜у----save and close part, back to main assemblyn И!КЌЌ ˜!j%Ж'X И!МЌЌ ˜!j%Ж'X И!ОЌ Р!Т ˜!j%Ж'Xу+-----gibt es schon einen Begrenzungsrahmen?№ ˜!Ф.œ œВb œ!'š šЙBegrenzungsrahmenœ š'xџџ kџџ˜№ œ%Ц.œМџџ€у-----Wenn nicht dann Йœу"-----Name der Ebene Oben ermitteln№ 2!Ф.ž žВbЙRefPlane ž!Шœ  Ќ '  ž!'š  Ќœ š'’kџџА  Ќœ š'”kџџ  Ќœ š'–kџџpkџџh№ ž!Ц.žМџџPу3-----dann Begrenzungsrahmen auf Ebene Oben einfќgen ”ЙPLANEЌЌЌКЌВЌ ˜!j%Ъ 'Xу’Set BoundingBox = Part.FeatureManager.InsertGlobalBoundingBox(swGlobalBoundingBoxFitOptions_e.swBoundingBoxType_BestFit, False, False, longstatus)№ а!вКК N ˜!Ь%Ю..К ˜B@fЙBegrenzungsrahmenЙ BBOXSKETCHЌЌЌКЌВЌ ˜!j%Ъ 'X ˜B@дК ˜B@fkџџу4-----Abmessung aus den Konfig-Eigenschaften auslesen 2!ж'Є№ 2!к.и и!'м Ј Є“ Ј 2%о'Њ Њ$рœ Ќ Њ“ ЌЙ Wert= Ј Ќ 2%т 'ЎЙ2 & swModel.CustomInfo2(vConfigName, vCustInfoName)'d ЌЙBegrenzungsrahmen - Gesamtlфngeœ Ј Ќ 2%ф'Ау MsgBox MaпAkџџ ЌЙ Begrenzungsrahmen - Gesamtbreiteœ Ј Ќ 2%ф'Ву MsgBox MaпBkџџ  ЌЙ Begrenzungsrahmen - Gesamtstфrkeœ Ј Ќ 2%ф'Ду MsgBox MaпCkџџ8Ъ0kџџ(Ъ ВЙx ДЙx А'ЂуMsgBox Abmessung_neuуC----schreibt die Abmessung in die Benutzerdefinierten EigenschaftenenуYretVal = swModel.AddCustomInfo3(configName, "ABMESSUNG", swCustomInfoText, Abmessung_neu)у#---Insert GlobalBoundingBox on parterdefiЙ ABMESSUNGЙText Ђ 2%ц'ІoџџАуJ----schreibt die Abmessung in die Konfigurationsspezifischen Eigenschaftenу----save and close part, back to main assemblyу a---open part from assembly function (if subassembly, create another for-loop with same procedure)у^-----in den Dokumenteneigenschaften die Einheiten auf MMGS (Millimeter, Gramm, Sekunde) setzenџџџџ8џџџџAЖAttribute VB_Name = "BoundingBox" DimР swApp0 As SldWo0rks. ZMo8del^ Z2Do4c2\A/.AsРsembly0 .`_CompNum^ 0IntаegerŽ1‘c€#onentsƒ€Varianўt‡#‡%š6€ІПU‚1ˆ†)„Ni„+€Žwj lon@gstatuЧ;Lƒ€;Error‡С FilnС•ЫSРœngЧ„Э„6 gswAEХ‡ƒŸбKboolЬ-bB€eanƒSub main(’)ФetЙ= €Кlication= ЗSB ‚АРЪХ.AрctiveœƒC'---Ist ein DokumРŽ geіffnet?УIfРCIs Nothсп The+=SendMsgToUser2 "PEs ikATˆeilF!",С€bInformТ1OkУAExi t   #End LIfЇ#sw.ClearSele@on2 True#" ExtЧТ"Ѓ ens€(C#Щ"BaugrPuppe№"(хGetTy@<>рр ASSEMBL Y)џ$р$Dieses Makro funk;iert nur bшei †n_'РY'э# у"ц”=с1AЂФ у!`рmbe r of Ч‡, not incluСБ childƒш@ subaCЁП@C сaa!Х.` хцdCрЛt(!8$_'ё%- 1ƒ ЇЃ]c *yъ si For i`0 To~ Ф C #Ц G (іiJqbHA)СЂ @_ЄЃaJh†AS IrфesO()р`ŠiaDebug.PРrint (Їbр˜+ "рj`+ppСed"фEls$_Ёaa8open pa Jfrom d2yM"f (i |†5y, cre ate a`gi@bt es €….Пk*q р“ "Ref€5ne"pу. TypvПЁУj#—k+ќ 1SѓS$D4ПбЏ! 1!ї“T4•=Љ%ŸС­ пf_Ё§2џћђ2w0Пхџ•яsџq§3џуT=ђ3џJТџ џ=œ)б$Ш3S Ћ33;Q2I 1hB Є0inМfќkз_)glPЉ@ByID2(B2, "PLANEў"Вc@U aРтLЁK{АЈT'A АuQЃЇMˆana@l.InАm€tGlobalиРm>FitOpt qsR\иЁ6_Be№Vit, FalєseflŸуБШ П §!€.d6П П ќ П •ПѓВ Б–om8џ PвтЛ“ј вCl€{SeЁџ@2`зџЏs!ƒїп`0"BBOXSK№ETCH”А/Р,R EditSuhpprГ2ч nП /Cг+И+s"–KђЕ-Eњ•ausјles%l<ИЧ\PWуЙиura"QBsуќswг`;эѓžz=#c–ОxFo!аfach )ЛInџщ ТГЁ@ЗСУ‹ рИФomEМs2(X˜!€JА IsEmp\ty@XМ0)K x РжБInfoName In vCust€Arr  stri =   + " Wert="swMo€del.GetšomžValue(vConfigк, „)iTexТti" & RO:2K"LзIf Ш= "Begrenzungsrahmen - Gesamtlфnge" The†n')MaпA€ZЌX—''MsgBo x +“End If“ “ +{breєitс=Bџ=APУШ=BS1џ=Р+˜{stфДrkс=Cџ=в=Cч=>NРЪG IFGУAbmess@З_ne*u.(–B@l"xыm€C‰AфrЅ1Њ Ѓ'-sch`Ebt die QF inKburationssРpezifi@ l Eigen@afТtek'ret€†H+ˆAddч3(cH‰"ABMESSUpNG",€…Чaˆ,Ga$пФBenutzerdefИini€œѓл(*>"С Њ)цЁ7Sub џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8ѕЊи` пўЪџџџџџџџџxџџџџЛАAttribute VB_Name = "ThisLibraryˆ" ˆBasˆ0{801A2004-A66C-11D3-A8BD-0861E BBD6} |GlobalЮSpa‚c’False dCreatablPredeclaIdАTru BExposeTemplate`Deriv’BuРstomizD2Jвмц№‚§џџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШb€WvveЪ ƒ cF C.СУFor Eaˆch Ш# In‰€'У СvAInfo.‚ˆ…s2(#HШ`If Рf IРsEmpty € aШ) Th…IФК ?Ш) C*KЧ*Хst ri@?Š. + "ф W@Ц="€Щ^@omA#Value=I0,@EШ4ETe„xt@" & …яCЭСJCЭ"-OС `' =a­c - Gesamtlфpnge"№)%сMјaпA ?i?Аe ј'Ms’с “)iЅ?хпAOЁ,Ž‚ЦbrˆeitџaпBџїП>%шBџЅхџAџstфrkџaМпCџџ%шCџ§ЅN`eЇ)B'уцЋP_neu(KBY@l"xm€C‰A?$SЅЊ Ѓ‚Зsch`Ebt dieт F inуИБsspezifi@@МjЛ ret€†‘H+Addч3(‡Б зABMESSUМNG€з€КЦŽaˆ,Ga o o b Benutzerdefјini@Nџ Qя щ є(" "a  кv бSub №вдџџџџй-22ЃЪџџ#ˆЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{801A2004-A66C-11D3-A8BD-0000861EBBD6}џџџџ@€ўџџџџџ џџџџ0џџџџџџџџџџk\be%џџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџпўЪџџџџџџџџxџџџџЛАAttribute VB_Name = "ThisLibraryˆ" ˆBasˆ0{801A2004-A66C-11D3-A8BD-0861E BBD6} |GlobalЮSpa‚c’False dCreatablPredeclaIdАTru BExposeTemplate`Deriv’BuРstomizD2џџџџџџџџ(