A collection of PivotField objects that represents all the calculated fields in the specified PivotTable report.
A report that contains Revenue and Expense fields could have a calculated field named “Profit” defined as the amount in the Revenue field minus the amount in the Expense field.
For OLAP data sources, you cannot set this collection, and it always returns Nothing.
Use the CalculatedFields method to return the CalculatedFields collection .
Use CalculatedFields(index), where index is specified field’s name or index number, to return a single PivotField object from the CalculatedFields collection.
The following example deletes the calculated fields from the PivotTable report named “Pivot1”
For Each fld in _ Worksheets(1).PivotTables("Pivot1").CalculatedFields fld.Delete Next