Macro not working on active worksheet

[rs1aj]

I created a macro that I want it to work on the active worksheet, not just on the particular worksheet I created the macro on. Here is how it starts. I assume there is an issue with the "pivotTable4" Thanks for your help.

ActiveSheet.PivotTables("PivotTable4").PivotFields("CUSTOMER NAME").AutoSort _
xlDescending, "SALES DOLLARS", ActiveSheet.PivotTables("PivotTable4"). _
PivotColumnAxis.PivotLines(4), 1

[Bernie Deitrick]

You could try this, if you have one pivottable on the sheet:

Please Login or Register  to view this content.

[rs1aj]

That worked. Thanks!