ࡱ> 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 Entry`s<@*apcHq`sThe VBA Project Hq`s_VBA_Project Hq`s #",$&'()*+0-./21!;>=%__SRP_3<{PROJECT \PROJECTwmc>VBA Project Data" j  !"#$%&'()*+,-./0123456789:;D=?@ABCEFHIJKLMNOPQRSTUVWXYZ[n]^_`abfghiklmtopquvwxyz{|}~Host Project Items& e4VBA Project Signature,d Host Project Item Names0 Hq`sThisLibraryHq`st Extender 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{!I ThisLibrary*{P"I 5{"I L{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{P#I L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{#I ";{P$I $={$I &1D3-A8&L{801A0000-A66C-11D3-A8BD-0000861EBBD6}>|C:\Programme\SolidWorks 2002\macros\anpassen und speichern.swpx@ (`@ PP 06@,@ ,k=$*\Rffff*963f7ffd84*\R0*#14diri__SRP_0Project_Data_CurVer(s Host Project Item List Data8rVBAHq`aThisLibraryMacro21G __SRP_2>,o*mrRee@l @0\ __@HL @`< @, ID="{0A3F8A5B-A9B2-4B29-9EBE-05C6C2CACD90}" Document=ThisLibrary/&H00000000 Module=Macro21 Name="Macro2" HelpContextID="0" VersionCompatible32="393222000" CMG="2426054C1B531F531F531F531F" DPB="2F2D0E45125B1C5C1C5C1C" GC="3A381B5227532753D8" [HosControl List Data$`s`sReqControl List Data*`s`s_VBA_PROJECTProject Item Data$ __SRP_1FReqControl List Data* Control_Data_CurVer( Control List Data$(.ApplicationActiveDoc *IsometrischShowNamedView2 Save2ViewZoomtofit2CloseDocVBE6.DLL )  swAppGetPathNamee0* 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:p:!Cam *\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\SolidWorks 2002\swvba.tlb#SolidWorks Extensibility Type Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\System32\stdole2.tlb#OLE Automation  k=I~ThisLibrary403f7ff776ThisLibrary-Macro21963f7ffd84Macro21 8Rt.MCvR0)mdYA%ҭ|XH"#( SolidWorks; VBAWin16~Win32MacVBA6# Macro2Nstdole` ThisLibraryG _Evaluate Macro21 swAppPart~ boolstatusg longstatusW AnnotationsGtol DatumTag"6 FeatureDataFeature!> Component"(main, CreateObject ActiveDocڒShowNamedView2>|Save2RViewZoomtofit2Mit _B_var_MitpdiesemYMakro$sollenxCrU ,$` n00rU~|  iII l  l45l_Wl45l:\%(<%_f\%_ _f\%__Wl  @_`(lloseDoc  _B_var_NameX GetPathNameH  $L } I~ V bX V b ( 6  (08@HPX` "h $ p   O ******************************************************************************f\ C:\DOKUME~1\waleska\LOKALE~1\Temp\swx956\Macro1.swb - macro recorded on 02/18/02 by waleskaO ******************************************************************************]0]X]]](]P]]x]]SldWorks.Application$,. !.. *Isometrisch B@0 B@2 B@4 B@2o[Mit diesem Makro sollen Bauteile und Baugruppen in Isometrischer Ansicht und Zeichnungen inre a %D'"  B@@"voller Gre abgespeichert werden.024.02.03 Anschlieend wird die Datei geschlossen0XAttribute 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.24.02.03%chliee9wirdL Datei  ossen Dim swApp As Object Pa- bool@statusA B@ea@longL@Anno@ i@b Gtol (umTagIFereaComponent  SuBbin()?Set?= CreC@("SldW orks.@Flicat0" A BF=.Activ@eDoc .ShowdVi@ew2 "*y", 7 ave2 FalseD Zoomtofit2 ݂GetpPath2Bp.PClos"  E; *********************************'I~#xME (xME(> < <H @P @  @$ @($ @@ *`Hk X @ @( @"x @& @0x(XPte%(SLSS<N0{801A2004-A66C-11D3-A8BD-0000861EBBD6}@(%H@0k=" ' *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=.ActiveDoc .ShowdView2 "*l", 7 ave2 Fal seD Zoomtofit2 GetPath2E6 I~#xME (SLSS<N0{801A2004-A66C-11D3-A8BD-0000861EBBD6}b *JC:\DOKUME~1\waleska\ LOKALTemp\swx956\1.swb - m recorded on 02/18/02 by GRMit diesem Makro sollen Baile undgrupp in IsomescherZeichnun gv!r Gre abgespert wepn Dim swApp As Objedct Pa boolstatusBea"!long L#AnnoiR PGtol DmHTagFereaCom@ponent   Sub@yin(")?Set?= CreC@("SldWorks.A@Flicat0" A BF=.ActiveDoc .ShowdView2 "B*i", 7 ave2 FalseD Zoomtofit2 E/