Add Method (PivotItems Collection) Example
This example creates a new PivotTable item in the first PivotTable report on worksheet one.
Worksheets(1).PivotTables(1).PivotFields("Year").Add "1998"