Is there a faster way to hide the pivot items in a pivot field than
using a FOR EACH...NEXT statement? It takes roughly 1 second per pivot
item to change it's visibility.

I'm using the following code:

Code:
--------------------
For Each pi In ActiveSheet.PivotTables("PivotTable1").PivotFields ("BILL_TO_CUST_NAME").PivotItems
pi.Visible = False
Next
--------------------


_The_pivot_field_has_a_couple_hundred_items_in_it_ and only 5 need to
be visible; the rest need to be hidden. I'm using code to filter the
table several ways and save each result for another report. The
original report is automatically created by IT and they said that's the
way the report is going to stay.

Suggestions?


--
Air_Cooled_Nut


------------------------------------------------------------------------
Air_Cooled_Nut's Profile: http://www.excelforum.com/member.php...o&userid=15730
View this thread: http://www.excelforum.com/showthread...hreadid=501870