Add Method (PivotFormulas Collection) Example
This example creates a new PivotTable formula for the first PivotTable report on worksheet one.
Worksheets(1).PivotTables(1).PivotFormulas _ .Add "Year['1998'] Apples = (Year['1997'] Apples) * 2"