Freigeben über

PivotField.CurrentPageList-Eigenschaft (Excel)

  • Artikel

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.