I am looking for Excel VBA code that can quickly remove the selected PivotItems in a PivotField so that I can then go and select the new PivotItems I want to show. I have the code shown below that loops through all the PivotItems and removes them one by one but my PivotItem list is over 1800 items long and I have to do this on 3 different PivotTables so it takes a while for the code to finish. Is there any way to remove all selected PivotItems in a quicker way than using a Loop?

Please Login or Register  to view this content.