PivotField.AutoShowField (Excel)
Returns the name of the data field used to determine the top or bottom items that are automatically shown in the specified PivotTable field.
Dim strAutoShowField As String
strAutoShowField = ActiveCell.PivotField.AutoShowField