Set Part = swApp.ActiveDoc Set Part = swApp.NewDocument("N:\- solidworks library -\base solidworks\pieces_DMI_2011 .prtdot", 0, 0, 0) swApp.ActivateDoc2 "Teil5", Falsch, longstatus Set Part = swApp.ActiveDoc Set Part = swApp.ActiveDoc myModelView als Objekt dimmen Festlegen von myModelView = Part.ActiveView myModelView.FrameLeft = 0 myModelView.FrameTop = 0 Festlegen von myModelView = Part.ActiveView myModelView.FrameState = swWindowState_e.swWindowMaximized swApp.ActivateDoc2 "Montage der Umlenkrolle. SLDASM", Falsch, longstatus Set Part = swApp.ActiveDoc longstatus = Part.SaveAs3("C:\a_travail\Sockel zum Entfernen der Abdeckung\Riemenscheibenbaugruppe. SLDPRT", 0, 0)