VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

VBA-Begriff: CubeField-Objekt

Worksheets-Auflistung (Worksheet-Objekt)
PivotTable-Auflistung (PivotTable-Objekt)
CubeField-Objekt
CubeFields-Auflistung (CubeField-Objekt)

Stellt ein Hierarchie- oder Measurefeld eines OLAP-Cubes dar. In einem PivotTable-Bericht ist das CubeField-Objekt Mitglied der CubeFields-Auflistung.

Verwenden des CubeField-Objekts

Verwenden Sie die CubeField-Eigenschaft, um das CubeField-Objekt zurückzugeben. In diesem Beispiel wird eine Liste der Cube-Feldnamen für alle Hierarchiefelder im ersten OLAP-basierten PivotTable-Bericht in Sheet1 erstellt.

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

Verwenden Sie CubeFields(Index), wobei Index die Indexnummer des Cube-Feldes ist, um ein einzelnes CubeField-Objekt zurückzugeben. Im folgenden Beispiel wird der Name des zweiten Cube-Feldes im ersten PivotTable-Bericht im aktiven Tabellenblatt bestimmt.

strAlphaName = _
    ActiveSheet.PivotTables(1).CubeFields(2).Name