Propriété PivotField.CubeField (Excel)
Renvoie l’objet CubeField à partir duquel le champ de tableau croisé dynamique spécifié est descendu. En lecture seule.
Syntaxe
expression. Cubefield
Expression Variable qui représente un objet PivotField .
Exemple
Cet exemple crée une liste des noms de champs de cube pour tous les champs de hiérarchie dans le premier rapport de tableau croisé dynamique OLAP (Online Analytical Processing) sur la première feuille de calcul. Cet exemple suppose qu’un rapport de tableau croisé dynamique existe 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.