VBA-Begriff: PageSetup-Objekt
|
|
Stellt die Beschreibung der Seiteneinrichtung dar. Das PageSetup-Objekt enthält alle Attribute zur Seiteneinrichtung (linker Rand, unterer Rand, Papiergröße usw.) als Eigenschaften.
Verwenden des PageSetup-Objekts
Verwenden Sie die PageSetup-Eigenschaft, um ein PageSetup-Objekt zurückzugeben. Im folgenden Beispiel wird das Papierformat auf Querformat gesetzt und das Tabellenblatt gedruckt.
With Worksheets("sheet1")
.PageSetup.Orientation = xlLandscape
.PrintOut
End With
Mit Hilfe der With-Anweisung lassen sich besonders leicht mehrere Eigenschaften gleichzeitig festlegen. Im folgenden Beispiel werden alle Ränder für das erste Tabellenblatt gesetzt.
With Worksheets(1).PageSetup .LeftMargin = Application.InchesToPoints(0.5) .RightMargin = Application.InchesToPoints(0.75) .TopMargin = Application.InchesToPoints(1.5) .BottomMargin = Application.InchesToPoints(1) .HeaderMargin = Application.InchesToPoints(0.5) .FooterMargin = Application.InchesToPoints(0.5) End With