PivotField.MemoryUsed (Excel)

Returns the amount of memory currently being used by the object, in bytes.

Dim lngMemoryUsed As Long
lngMemoryUsed = ActiveCell.PivotField.MemoryUsed