CubeFields Collection Object

                  Properties                 

A collection of all CubeField objects in a PivotTable report that is based on an OLAP cube. Each CubeField object represents a hierarchy or measure field from the cube.

Using the CubeFields Collection

Use the CubeFields property to return the CubeFields collection. The following example creates a list of cube field names of the data fields in the first OLAP-based PivotTable report on Sheet1.

Set objNewSheet = Worksheets.Add
intRow = 1
For Each objCubeFld In _
    Worksheets("Sheet1").PivotTables(1).CubeFields
    If objCubeFld.Orientation = xlDataField Then
        objNewSheet.Cells(intRow, 1).Value = objCubeFld.Name
        intRow = intRow + 1
    End If
Next objCubeFld

Use CubeFields(index), where index is the cube field’s index number, to return a single CubeField object. The following example determines the name of the second cube field in the first PivotTable report on the active worksheet.

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