ChrisAcheson
12-21-2016, 04:33 AM
Hi All
In rows field, I have 'Reason'
is any one able to help 'show all data' which splits out my reason codes, and each tab represents code 1, 2,3,4 etc?
Thank you.
With ActiveSheet.PivotTables("PivotTable1").PivotFields("ReasonCode")
.Orientation = xlRowField
.Position = 1
End With
In rows field, I have 'Reason'
is any one able to help 'show all data' which splits out my reason codes, and each tab represents code 1, 2,3,4 etc?
Thank you.
With ActiveSheet.PivotTables("PivotTable1").PivotFields("ReasonCode")
.Orientation = xlRowField
.Position = 1
End With