PivotField.CalculatedItems (Excel)

Returns a CalculatedItems collection that represents all the calculated items in the specified PivotTable report.

For OLAP data sources, this method returns a zero-length collection.

Dim cis As CalculatedItems
Set cis = ActiveCell.PivotField.CalculatedItems()