Code bricht ab
11.05.2017 11:22:48
Rene
ein etwas größerer VBA-Code läuft soweit ganz gut.
Zum Ausdrucken habe ich folgenden Code eingesetzt:
....
With .PageSetup
.PrintGridlines = True
.FitToPagesTall = 1
.fittopagewide = 1
.Zoom = True
End With
Me.Hide
.PrintPreview
Me.Show
Application.DisplayAlerts = False
.Delete
Application.DisplayAlerts = True
End With
....
Allerdings schmeißt mich der Code in der Zeile ".fittopagewide=1" raus.
Das zu druckende Sheet besteht aus 3 Spalten welche leider breiter sind als der "normale" Druckbereich eines DinA4-Blattes.
Ich wollte damit eigentlich den Ausdruck auf eine Seite anpassen.
Weiß einer wo ich da den Fehler drin hab?
Lieben Dank im Voraus
René