![]() ![]() ![]() ![]() ![]() ![]() |
Eine Auflistung aller PivotItem-Objekte eines PivotTable-Feldes. Die Elemente sind die einzelnen Dateneinträge in einer Feldkategorie.
Verwenden der PivotItems-Auflistung
Verwenden Sie die PivotItems-Methode zum Zugriff auf die PivotItems-Auflistung. Im folgenden Beispiel wird für den ersten PivotTable-Bericht des Tabellenblatts Sheet4 eine nummerierte Liste der Feldnamen und der Elemente in diesen Feldern erstellt.
Worksheets("Sheet4").Activate
With Worksheets("Sheet3").PivotTables(1)
c = 1
For i = 1 To .PivotFields.Count
r = 1
Cells(r, c) = .PivotFields(i).Name
r = r + 1
For x = 1 To .PivotFields(i).PivotItems.Count
Cells(r, c) = .PivotFields(i).PivotItems(x).Name
r = r + 1
Next
c = c + 1
Next
End With
Verwenden Sie PivotItems(Index), wobei Index der Name oder die Indexnummer des Elements ist, um ein PivotItem-Objekt zurückzugeben. Im folgenden Beispiel werden die Einträge in dem ersten PivotTable-Bericht des Tabellenblatts Sheet3 ausgeblendet, die im Feld "Year" den Wert "1998" enthalten.
Worksheets("Sheet3").PivotTables(1) _
.PivotFields("year").PivotItems("1998").Visible = False