CubeField 属性 - Microsoft Excel Visual Basic 2002 参考

返回介绍

CubeField 属性

发布于 2019-08-07 字数 953 浏览 1039 评论 0

全部显示

CubeField 属性

返回派生出指定数据透视表字段的 CubeField 对象。只读。

expression.CubeField

expression 必需。该表达式返回“应用于”列表中的对象之一。

示例

本示例为第一张工作表中第一个基于 OLAP 的数据透视表中所有分层字段的多维数据集字段名称创建一个列表。

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

上一篇:CrossesAt 属性

下一篇:CubeFields 属性

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!