PivotField.AutoShowCount (Excel)

Returns the number of top or bottom items that are automatically shown in the specified PivotTable field.

Dim lngAutoShowCount As Long
lngAutoShowCount = ActiveCell.PivotField.AutoShowCount