ࡱ> Root Entrypb@apcHqpbThe VBA Project Hqpb_VBA_Project Hqpb  5 34 diriPROJECT \PROJECTwmc>VBA Project Data" j,  !"#$%&'(*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOQRSTUVWXYZ[n]^_`abfghiklmtopqHost Project Items& e4VBA Project Signature,d Host Project Item Names0 HqpbThisLibraryHqpbtender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLibrary=0, 0, 0, 0, C Macro21=242, 242, 988, 857, , Z ThisLibraryThisLibraryMacro21Macro21&L{801A0000-A66C{PmdThisLibrary*{md5{PndL{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{nd L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{Pod";{od$={fd&1D3-A8&L{801A0000-A66C-11D3-A8BD-0000861EBBD6}QC:\Dokumente und Einstellungen\mueller\Eigene Dateien\SWX\Makro\xAttribute VB_Name = "ThisLibrary" Bas0{801A2004-A66C-11D3-A8BD-0861E BBD6} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplate`DerivBustomizD26@,@iso-speichern.swpRJ,fd84*\R0*#Control_Data_CurVer(w Control List Data$v(Project_Data_CurVer(s Host Project Item List Data8rVBAHqpbThisLibraryPMacro21) _VBA_PROJECT8(%HID="{0A3F8A5B-A9B2-4B29-9EBE-05C6C2CACD90}" Document=ThisLibrary/&H00000000 Module=Macro21 Name="Macro2" HelpContextID="0" VersionCompatible32="393222000" CMG="CFCDEE8432849888988898889888" DPB="393B185D195D195D" GC="A3A182A8EDA9EDA912" [Host ExControl List Data$pbpbReqControl List Data*pbpbReqControl List Data*x Project Item Data$u F  (e0* pHdMacro2$@T=j k= J < stdole>stdole( h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\System32\e2.tlb#OLE Automation`"qI~ ThisLibraryG JisLibray 2#H1`% ,Q@"+ 1G =c>o21@2::!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#D:\PROGRA~1\SOLIDW~1\swvba.tlb#SolidWorks Extensibility Type Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\System32\stdole2.tlb#OLE Automation  k=I~ThisLibrary9546dd2cfdThisLibrary%Macro219646dd2cfdMacro218H^KGȔAFK@7eJTH( SolidWorks;VBAWin16~Win32MacVBA6#Macro2Nstdole` ThisLibraryG _EvaluateMacro21 swAppPart~ boolstatusg longstatusW AnnotationsGtol DatumTag"6 FeatureDataFeature!> Component"main, CreateObject ActiveDocڒShowNamedView2>|Save2RViewZoomtofit2 GetPathNameCloseDoc H  $I~LSI~xME8` te` el` ll`Da` Ma`  o1.s`" on 0`$ `& `( *  V bX V b (  " $(8 X h xO ******************************************************************************o\ C:\DOKUME~1\waleska\LOKALE~1\Temp\swx956\Macro1.swb - macro recorded on 02/18/02 by waleskaO ******************************************************************************[Mit diesem Makro sollen Bauteile und Baugruppen in Isometrischer Ansicht und Zeichnungen in"voller Gre abgespeichert werden.]]]0]H]`]x]]]]SldWorks.Application$,.@@ !..` *Isometrisch B@0p B@2p@ B@4VhMd B@2`` %6'n oXAttribute VB_Name = "Macro21Root Entry0̞8U# apcHq0̞8UThe VBA Project Hq0̞8U_VBA_Project Hq0̞8U "! .$%&'()*+,- dirhPROJECT \PROJECTwmc>VBA Project Data" j  !"#$%&'(*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWYZ[n]^_`abfghiklmopqtuvwxyz{Host Project Items& e4VBA Project Signature,d Host Project Item Names0 Hq0̞8UThisLibraryHq0̞8Utender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLibrary=0, 0, 0, 0, C Macro21=242, 242, 988, 857, C Z ThisLibraryThisLibraryMacro21Macro21&L{801A0000-A66C{l ThisLibrary*{m 5{m L{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{n L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{n ";{o $={o &1D3-A8&L{801A0000-A66C-11D3-A8BD-0000861EBBD6}1bI:\SolidWorks_Bibliothek\Macros\iso-speichern.swpRSWX\Makro\(Control_Data_CurVer(~ Control List Data$}(Project_Data_CurVer(s Host Project Item List Data8rVBAHqpbThisLibraryXMacro21) _VBA_PROJECTI~#xME ID="{0A3F8A5B-A9B2-4B29-9EBE-05C6C2CACD90}" Document=ThisLibrary/&H00000000 Module=Macro21 Name="Macro2" HelpContextID="0" VersionCompatible32="393222000" CMG="6A684BB080B480B480B480B4" DPB="A3A182FBBAFCBAFCBA" GC="DCDEFDC60FFE10FE1001" [Host ExSLSS<N0{801A2004-A66C-11D3-A8BD-0000861EBBD6}6@,@8(%HControl List Data$0̞8U0̞8UReqControl List Data*0̞8U0̞8UReqControl List Data* Project Item Data$| d0* pHdMacro2$@T=j PG J < stdole>stdole( h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\System32\e2.tlb#OLE Automation`"qI~ ThisLibraryG JisLibray 2#H1`% ,Q@"+ 1G =c>o261@2: :!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#D:\PROGRA~1\SOLIDW~1\swvba.tlb#SolidWorks Extensibility Type Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\System32\stdole2.tlb#OLE Automation  PG I~ThisLibrary9546dd2cfdThisLibrary%Macro219646dd2cfdMacro21 8H^KGȔAFK@7eJTH ( SolidWorks;VBAWin16~Win32MacVBA6#Macro2Nstdole` ThisLibraryG _EvaluateMacro21 swAppPart~ boolstatusg longstatusW AnnotationsGtol DatumTag"6 FeatureDataFeature!> Component"main, CreateObject ActiveDocڒShowNamedView2>|Save2RViewZoomtofit2 GetPathNameCloseDoc typGetType)J swDocDRAWINGVH  $I~LSI~xME8` te` el` ll`Da` Ma`  o1.s`" on 0`$ `& `( *, V bX V b (  " $(  8 &Hpx (       0@ PO ******************************************************************************o\ C:\DOKUME~1\waleska\LOKALE~1\Temp\swx956\Macro1.swb - macro recorded on 02/18/02 by waleskaO ******************************************************************************[Mit diesem Makro sollen Bauteile und Baugruppen in Isometrischer Ansicht und Zeichnungen in"voller Gre abgespeichert werden.]]]0]H]`]x]]]]SldWorks.Application$,.@@ !..` trisch MsgBox "Kein Dokument geffnet!"g(k %<': : >X!Prfen, ob Dokument Zeichnung ist B@4dh *Isometrisch B@0Slk@ B@2, B@4 ! B@2oAttribute VB_Name = "Macro21" ' *JC:\DOKUME~1\waleska\ LOKALTemp\swx956\1.swb - m recorded on 02/18/02 by GRMit diesem Makro sollen Baile undgrupp in Isomescher AnsichtZenungWv&r Gre abgespert we!un. Dim swApp As Object  Pa boolstatusBeanlong LAnno@ iV Gtol DmTagFe4reaComponent  Sub|inD()?Set?=( CreC@("SldWorks.@Flicat0." A BF=.ActiveDocIf Is Nothing The@H'MsgBox "Keq Dokum&geffnet! End  If'Prfen, ob Fy isitypA.GetType5!<>(@&DRAWING" ViewZoomtofit2 lse Showd2 "*", 7 ) ave2 Fa?M@1a-0000861EBBD6}xAttribute VB_Name = "ThisLibrary" Bas0{801A2004-A66C-11D3-A8BD-0861E BBD6} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplate`DerivBustomizD2 - m recorded on 02/18/JMit diesem Makro sollen Baile undgrupp in &r Gre abgespert w.02.03%chliee9wirdL Datei  ossen Dim sbbject Pa- bool@statusA B@ea@longL@Anno