Excel VBA教程:AddDataField方法

将数据字段添加到数据透视表中。返回一个PivotField对象,该对象代表新的数据字段。

expression.AddDataField(Field, Caption, Function)

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

Field   Object 类型,必需。服务器上的唯一字段。如果源数据是联机分析处理 (OLAP),则唯一字段是多维数据集字段。如果源数据不是 OLAP(非 OLAP 源数据),则唯一字段是数据透视表字段。

Caption   Variant 类型,可选。数据透视表中使用的标志,用于识别该数据字段。

Function   Variant 类型,可选。在已添加字段中执行的函数。

Excel VBA教程:AddDataField方法·示例

本示例将标题为“Total Score”的数据字段添加到名为“PivotTable1”的数据透视表中。

注意:本示例假定数据透视表的列中包含一个标题为“Score”的列。


Sub AddMoreFields()
    With ActiveSheet.PivotTables("PivotTable1")
        .AddDataField ActiveSheet.PivotTables( _
            "PivotTable1").PivotFields("Score"), "Total Score"
    End With
End Sub

上页:Excel VBA教程:AddCustomList方法 下页:Excel VBA教程:AddDiagram方法

Excel VBA教程:AddDataField方法

Excel VBA教程:AddDiagram方法 Excel VBA教程:AddFields方法
Excel VBA教程:AddFormControl方法 Excel VBA教程:AddItem方法
Excel VBA教程:AddLabel方法 Excel VBA教程:AddLine方法
Excel VBA教程:AddMemberPropertyField方法 Excel VBA教程:AddNode方法
Excel VBA教程:AddNodes方法 Excel VBA教程:AddOLEObject方法
Excel VBA教程:AddPageItem方法 Excel VBA教程:AddPicture方法
Excel VBA教程:AddPolyline方法 Excel VBA教程:AddReplacement方法
Excel VBA教程:AddSet方法 Excel VBA教程:AddShape方法
Excel VBA教程:AddTextbox方法 Excel VBA教程:AddTextEffect方法
Excel VBA教程:AddToFavorites方法 Excel VBA教程:AdvancedFilter方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号