Objet CubeField (Excel)
Représente une hiérarchie ou un champ de mesure à partir d’un cube OLAP. Dans un rapport de tableau croisé dynamique, l'objet CubeField est un membre de la collection CubeFields.
Utilisez la propriété CubeField de l’objet PivotField pour renvoyer l’objet CubeField . 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 de la feuille Sheet1.
Set objNewSheet = Worksheets.Add
objNewSheet.Activate
intRow = 1
For Each objPF in _
Worksheets("Sheet1").PivotTables(1).PivotFields
If objPF.CubeField.CubeFieldType = xlHierarchy Then
objNewSheet.Cells(intRow, 1).Value = objPF.Name
intRow = intRow + 1
End If
Next objPF
Utilisez CubeFields (index), où index est le numéro d’index du champ de cube, pour renvoyer un seul objet CubeField . L'exemple suivant montre comment déterminer le nom du second champ de cube contenu dans le premier rapport de tableau croisé dynamique, situé dans la feuille de calcul active.
strAlphaName = _
ActiveSheet.PivotTables(1).CubeFields(2).Name
- AllItemsVisible
- Application
- Caption
- Creator
- CubeFieldSubType
- CubeFieldType
- CurrentPageName
- DragToColumn
- DragToData
- DragToHide
- DragToPage
- DragToRow
- EnableMultiplePageItems
- FlattenHierarchies
- HasMemberProperties
- HierarchizeDistinct
- IncludeNewItemsInFilter
- IsDate
- LayoutForm
- LayoutSubtotalLocation
- Name
- Orientation
- Parent
- PivotFields
- Position
- ShowInFieldList
- TreeviewControl
- Value
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.