error 1004: unable to set the visible property of the pivotitem class

Hi, I use Excel 2010 andexample.xlsx cannot make my code working because of the so famous errore above. I was unable to find a solution reading previous posts, so hope anyone can help me.

I have several pivot tables (pt) in different worksheets (ws), and a list of items stored in an array I created. I've written a macro for setting ON all items in pt except those ones in the array (listOffnet within the code). Everything works properly.

Now, I would like to do the complementary action: setting OFF all items that are not in the array. Unfortunately, I get the error at line

Please Login or Register  to view this content.

Many thanks! This is my code:

Please Login or Register  to view this content.

Example attachment

Thanks