Worksheets (Worksheet)![]() ![]() ![]() |
代表基于 OLAP 多维数据集的数据透视表中所有 CubeField 对象的集合。每个 CubeField 对象都代表多维数据集中的一个层次或度量值字段。
可用 CubeFields 属性返回 CubeFields集合。下例为数据字段(工作表 Sheet1 上第一个基于 OLAP 的数据透视表上)的多维数据集字段名称创建一个列表。
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
可用 CubeFields(index) 返回一个 CubeField 对象,其中,index 为多维数据集字段的索引号。下例可确定当前活动工作表中第一个数据透视表的第二个多维数据集字段的名称。
strAlphaName = _
ActiveSheet.PivotTables(1).CubeFields(2).Name