PivotField.Subtotals (Excel)
Returns or sets subtotals displayed with the specified field. Valid only for nondata fields.
If an index is True, the field shows that subtotal. If index 1 (Automatic) is True, all other values are set to False.
Subtotals (Index)
Index: A subtotal index, as shown in the following table. If this argument is omitted, the Subtotals method returns an array that contains a Boolean value for each subtotal.
ActiveCell.PivotField.Subtotals = True