VBA Pivot Table Filter Macro

Hello Everyone,
I have a pivot table that is updated every week and extended by the previous weeks data. The pivot table contains campaigns by country. I want to filter the campaigns for each country separately (and then copy it to another sheet). More precisely i need the data for the last week (therefore count-1).
But my filter parts creates some trouble. That´s what I tried:

Please Login or Register  to view this content.

calendar week is set as pivot table filter (above the table)

can anyone help me on this issue? would be very appreciated

sry forget to tell you that. the Debugger points out the - .PivotItems(i).Visible=False - in my for loop!

Hello guys, just found my mistake. missed the .field! before the .PivotItems...