Sort pivot table based on column selected in another sheet

I'm trying to use a macro to sort numeric values in a pivot table based on a column selected in another sheet.

I've managed to capture the column number (of the pivot) on which the data should be sorted. This is stored in a variable, pivotColToSort.

How can I pass the value of this column number into the code below, substituting it with the name of the pivot field? For example, if pivotColtoSort = 3, and the third column in the pivot table is "Count of Sales", I need the code to return:

Please Login or Register  to view this content.

Thank you.