PageSetup.Orientation-Eigenschaft (Excel)

Gibt einen XlPageOrientation-Wert zurück, der den Hochformat- oder Querformatdruckmodus darstellt, oder legt diesen wert fest.

Syntax

Ausdruck. Orientierung

Ausdruck Eine Variable, die ein PageSetup-Objekt darstellt.

Beispiel

In diesem Beispiel wird festgelegt, dass "Tabelle1" im Querformat gedruckt wird.

Worksheets("Sheet1").PageSetup.Orientation = xlLandscape

In diesem Beispiel wird festgelegt, dass das aktuell aktive Blatt im Hochformat gedruckt wird.

ActiveSheet.PageSetup.Orientation = xlPortrait

Dieses Verfahren wechselt die Ausrichtung in den gegenteilige Option.

Sub SwitchOrientation()
    Dim ps As PageSetup
    Set ps = ActiveSheet.PageSetup

    If ps.Orientation = xlLandscape Then
        ps.Orientation = xlPortrait
    Else
        ps.Orientation = xlLandscape
    End If
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.