VBA select multiple pivot

[sanket_sk]

Hi All,

I am working on a small project where I want to apply ROWs filter on multiple pivots using VBA, I searched over the internet and found a suitable VBA code for this activity.
However, the code is working only on one private and I want to use it over 45+ pivots in the same worksheet.

Could you please help me write the correct code which I can apply to multiple pivots?

I am stuck at this line

Set PVT = ActiveSheet.PivotTables(1)

Sanket