AddMemberPropertyField 方法

将成员属性字段添加到多维数据集字段的显示区域。

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

Property   String 类型，必需。成员属性的唯一名称。对于平衡分层结构，唯一名称可通过以下方式创建：将“quoted”成员属性名附加到与成员属性相关联的级别的唯一名称上。对于非平衡分层结构，唯一名称可通过以下方式创建：将“quoted”成员属性名附加到分层结构的唯一名称上。

PropertyOrder   Variant 类型，可选。为 CubeField 对象设置 PropertyOrder 属性值。集合中的实际位置将位于数据透视表字段的前一位，该字段当前具有由参数指定的相同的 PropertyOrder 值。如果没有一个字段具有给定的属性顺序值，则可接受的取值范围为 1 到已为分层结构显示的成员属性的个数加 1 之间。该参数从 1 开始。如果省略，则属性为列表中的最后一个。

说明

如果数据透视表视图上没有字段，则指定的属性字段将不可见。

若要删除成员属性，则使用 Delete 方法可从 PivotFields 集合中删除 PivotField 对象。

示例

在本示例中，Microsoft Excel 将标题为“Description”的成员属性字段添加到数据透视表的视图中。本示例假定数据透视表位于活动工作表上，并且包括“Country”、“Area”、“Description”项。

Sub UseAddMemberPropertyField()

    Dim pvtTable As PivotTable

    Set pvtTable = ActiveSheet.PivotTables(1)

    With pvtTable
        .ManualUpdate = True
        .CubeFields("[Country]").LayoutForm = xlOutline
        .CubeFields("[Country]").AddMemberPropertyField _
            Property:="[Country].[Area].[Description]"
        .ManualUpdate = False
    End With

End Sub