PivotField.CurrentPageList プロパティ (Excel)

ピボットテーブル レポートの複数項目ページ フィールドに含まれるアイテムの一覧に対応する文字列の配列を設定または返します。 値の取得と設定が可能なバリアント型 (Variant) の値です。

構文

.CurrentPageList

PivotField オブジェクトを表 す変数

解説

実行時エラーを回避するには、データ ソースが OLAP ソースで、選択されているフィールドが現在 Page 位置にある必要があります 。EnableMultiplePageItems プロパティを True に設定する必要 があります

次の使用例は、ピボットテーブル レポートの Food アイテムを一覧表示するページ フィールドを設定します。 ピボットテーブルがアクティブ ワークシート上にあるものとします。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。