Remarks

Because PivotTable report programming can be complex, it's generally easiest to record PivotTable report actions and then revise the recorded code.

Example

Use the method to return the PivotTables collection. The following example displays the number of PivotTable reports on Sheet3.

Visual Basic for Applications
MsgBox Worksheets("sheet3").PivotTables.Count

Use the method to create a new PivotTable report and add it to the collection. The following example creates a new PivotTable report from a Microsoft Excel database (contained in the range A1:C100).

Visual Basic for Applications
ActiveSheet.PivotTableWizard xlDatabase, Range("A1:C100")

Use PivotTables(), where is the PivotTable index number or name, to return a single PivotTableobject. The following example makes the Year field a row field in the first PivotTable report on Sheet3.

Visual Basic for Applications
Worksheets("sheet3").PivotTables(1) _ .PivotFields("year").Orientation = xlRowField
Pivot Tables Collection Object PivotTables Collection PivotTables Collection Object

See also:

index index