is there any solution to iterate through pivotitems and set them
hidden/showed ?
imho it seems VERY stupid to have to write code like this to show one
item, instead
of hiding all and showing what you need, you are provided with ONLY the
inverse method :(


ActiveSheet.PivotTables("PivotTable1").PivotFields ("[a].[b]").HiddenItemsList
= all_but_what_i_need :(