Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt das CubeField-Objekt zurück, von dem das angegebene PivotTable-Feld abstammt. Schreibgeschützt.
Syntax
Ausdruck. CubeField
Ausdruck Eine Variable, die ein PivotField-Objekt darstellt.
Beispiel
In diesem Beispiel wird eine Liste der Cubefeldnamen für alle Hierarchiefelder im ersten OLAP-basierten PivotTable-Bericht (Online Analytical Processing) auf dem ersten Arbeitsblatt erstellt. In diesem Beispiel wird davon ausgegangen, dass im ersten Arbeitsblatt ein PivotTable-Bericht vorhanden ist.
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
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.