Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

VBA-Begriff: Beispiel zur Orientation-Eigenschaft

In diesem Beispiel wird die Ausrichtung für das Feld "BESTELLDATUM" angezeigt.

Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
Set pvtField = pvtTable.PivotFields("ORDER_DATE")
Select Case pvtField.Orientation
    Case xlHidden
        MsgBox "Hidden field"
    Case xlRowField
        MsgBox "Row field"
    Case xlColumnField
        MsgBox "Column field"
    Case xlPageField
        MsgBox "Page field"
    Case xlDataField
        MsgBox "Data field"
End Select

In diesem Beispiel wird festgelegt, dass Sheet1 im Querformat gedruckt wird.

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