I've created a Pivot Table with 30+ fields. I've recorded the following macro to add the first field. I need help modifying the code so that it looks for and adds every field automatically. It'd save a lot of time.
Sub PTAdd() ' ' PTAdd Macro ' ' With ActiveSheet.PivotTables("PivotTable3").PivotFields("Assigned To") .Orientation = xlRowField .Position = 1 End With End Sub