Propriété PivotField.CurrentPageList (Excel)
Cette propriété renvoie ou définit un tableau de chaînes correspondant à la liste d'éléments inclus dans un champ de page à plusieurs éléments d'un rapport de tableau croisé dynamique. Variant en lecture/écriture.
Syntaxe
expression. CurrentPageList
Expression Variable qui représente un objet PivotField .
Remarques
Pour éviter les erreurs d’exécution, la source de données doit être une source OLAP, le champ choisi doit être actuellement à la position Page et la propriété EnableMultiplePageItems doit avoir la valeur True.
Exemple
Cet exemple montre comment définir le champ de page pour répertorier les éléments Aliments du rapport de tableau croisé dynamique. Il suppose qu'un tableau croisé dynamique se trouve dans la feuille de calcul active.
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
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.