AutoSort Method Example
This example sorts the Company field in descending order, based on the sum of sales.
ActiveSheet.PivotTables(1).PivotField("Company") _ .AutoSort xlDescending, "Sum of Sales"