Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt ein Array aus Zeichenfolgen zurück, das der Liste der Elemente entspricht, die in einem aus mehreren Elementen bestehenden Seitenfeld für einen PivotTable-Bericht enthalten sind, oder legt dieses fest. Variant mit Lese-/Schreibzugriff.
Syntax
Ausdruck. CurrentPageList
Ausdruck Eine Variable, die ein PivotField-Objekt darstellt.
Hinweise
Um Laufzeitfehler zu vermeiden, muss die Datenquelle eine OLAP-Quelle sein, das ausgewählte Feld muss sich derzeit an der Page-Position befinden, und die EnableMultiplePageItems-Eigenschaft muss auf True festgelegt werden.
Beispiel
In diesem Beispiel wird das Seitenfeld so festgelegt, dass die Lebensmittelelemente des PivotTable-Berichts aufgelistet werden. Es wird angenommen, dass auf dem aktiven Arbeitsblatt eine PivotTable vorhanden ist.
Sub UseCurrentPageList()
Dim pvtTable As PivotTable
Dim pvtField As PivotField
Set pvtTable = ActiveSheet.PivotTables(1)
Set pvtField = pvtTable.PivotFields("[Product]")
' To avoid run-time errors set the following property to True.
pvtTable.CubeFields("[Product]").EnableMultiplePageItems = True
' Set the page list to "Food".
pvtField.CurrentPageList = "[Product].[All Products].[Food]"
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.