nochmal eine Frage zur Seiteneinrichtung. Wenn ich meinen Bericht darstelle, dann möchte ich diesen im ersten Schrift auf die Seitenbreite bzw. Seitenhöhe optimal anpassen. Das mache folgendermaßen:
With ActiveSheet.PageSetup
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With
So weit, so gut. Wenn allerdings der Zoom zu klein wird (also unter 30%) sinkt, möchte ich diesen den Zoom nochmal hochsetzen. Allerdings bekomme ich nach dieser Prozedur keine Angabe über den Zoom in Zahlen. Wie kann ich mein Problem lösen, bzw. wie bekomme ich die %-Zahl von meinem aktiven Zoom raus?
Vielen Dank für alle Tipps.