返回一个 PivotField 对象,该对象代表数据透视表中的所有数据字段。只读。
expression.DataPivotField
expression 必需。该表达式返回一个 PivotTable 对象。
本示例将第二个 PivotItem 对象移到第一个位置。假定数据透视表位于活动的工作表上,并且数据透视表包含数据字段。
Sub UseDataPivotField()
Dim pvtTable As PivotTable
Set pvtTable = ActiveSheet.PivotTables(1)
' Move second PivotItem to the first position in PivotTable.
pvtTable.DataPivotField.PivotItems(2).Position = 1
End Sub