Hallo,
ich wollte gerne ein Formular für die idw´s erstellen damit sich Die Blattgröße beim klick auf z. B. "A4" automatisch ändert und sich auch der Zeichnungsrahmen anpasst. Allerdings funktioniert diese Regel nur so lang bis ich die Datei speichere und schließe.
ActiveSheet.ChangeSize(Auswahl, MoveBorderItems := True)
ActiveSheet.Border = "DIN_"&Auswahl
If Auswahl="A4" Then
ActiveSheet.Sheet.Orientation = PageOrientationTypeEnum.kPortraitPageOrientation
Else
ActiveSheet.Sheet.Orientation = PageOrientationTypeEnum.kLandscapePageOrientation
End If
InventorVb.SetViewCamera(ViewCameraOption.FitExtents, New Double() {29.700000762939453, 21, 145.55230242458438}, New Double() {29.700000762939453, 21, 0}, New Double() {0, 1, 0}, New Double() {63.0374319998792, 45.6374304740003})
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP