object that represents all the data fields in a PivotTable. Read-only.
expression.DataPivotField
expression Required. An expression that returns a PivotTable object.
Example
This example moves the second PivotItem object to the first position. It assumes a PivotTable exists on the active worksheet and that the PivotTable contains data fields.
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