PivotField.AutoSortField (Excel)

Devuelve el nombre del campo de datos que se utiliza para ordenar automáticamente el campo de la tabla dinámica especificado.

Dim strAutoSortField As String
strAutoSortField = ActiveCell.PivotField.AutoSortField