I am writing code for 2003 users using Excel 2007.
If the following selects all of the MultiplePage Items in a pivot table field:
What code do you use to deselect them all at one time? Once I deselect them all, I want to activate only 2 or 3 of the items using the PivotItems.Visible command (I will put those items together with the two lines above using a "With/End With" command.
I have looked all over for a way to deselect all the items at one time and cannot find the code. Any help is appreciated!
Thank you,
Charles
If the following selects all of the MultiplePage Items in a pivot table field:
Code:
ActiveSheet.PivotTables("PT1").PivotFields("Proc"). _
EnableMultiplePageItems = True
ActiveSheet.PivotTables("Top_Defects").PivotFields("Proc").CurrentPage = _
"(All)"What code do you use to deselect them all at one time? Once I deselect them all, I want to activate only 2 or 3 of the items using the PivotItems.Visible command (I will put those items together with the two lines above using a "With/End With" command.
I have looked all over for a way to deselect all the items at one time and cannot find the code. Any help is appreciated!
Thank you,
Charles
