SubtotalHiddenPageItems Property Example
This example sets the first PivotTable report on worksheet one to exclude hidden page field items in subtotals.
Worksheets(1).PivotTables("Pivot1").SubtotalHiddenPageItems = True