Propriété PivotField.CubeField (Excel)

Renvoie l’objet CubeField à partir duquel le champ de tableau croisé dynamique spécifié est décroit. En lecture seule.

Syntaxe

. CubeField

expression Variable qui représente un objet PivotField.

Exemple

Cet exemple crée une liste des noms de champ de cube pour tous les champs de hiérarchie du premier rapport de tableau croisé dynamique OLAP (Online Analytical Processing) de la première feuille de calcul. Cet exemple suppose qu’il existe un rapport de tableau croisé dynamique dans la première feuille de calcul.

Sub UseCubeField() 
 
 Dim objNewSheet As Worksheet 
 Set objNewSheet = Worksheets.Add 
 objNewSheet.Activate 
 intRow = 1 
 
 For Each objPF in _ 
 Worksheets(1).PivotTables(1).PivotFields 
 If objPF.CubeField.CubeFieldType = xlHierarchy Then 
 objNewSheet.Cells(intRow, 1).Value = objPF.Name 
 intRow = intRow + 1 
 End If 
 Next objPF 
 
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.