PivotField.AutoSortField (Excel)

Returns the name of the data field used to sort the specified PivotTable field automatically.

Dim strAutoSortField As String
strAutoSortField = ActiveCell.PivotField.AutoSortField