I have a pivot table with a lot of different countries in it, however, one of the groups is listed as "Other." The table should be sorted in decreasing order, with the exception of the "Other" entry, which should always come last. I've tried manually overwriting the position of "Other" after sorting in descending order, but every time I do so, the order of the entire table changes once more.
ActiveSheet.PivotTables(tblname).PivotFields("Country").AutoSort xlDescending, "Sum of Weight"
This works fine.
ActiveSheet.PivotTables(tblname).PivotFields("Country").PivotItems("Other").Position = 8
This moves "Other" into the last position but simultaneously changes the order of all other previously sorted items.