How to loop through a filtered pivot table in vba

[Echeb]

I have created a pivot table in vba, and have applied a filter to the data. I need to loop through the rows which match the filter but i am only able to loop through all the data not just the filtered, using .visible is not working.

'Filter pivot to show sum greater than 100
ActiveSheet.PivotTables("PivotTable1").PivotFields("AccountID").PivotFilters. _
Add2 Type:=xlValueIsGreaterThan, DataField:=ActiveSheet.PivotTables( _
"PivotTable1").PivotFields("Sum of FinancialValue"), Value1:=100

Any sugegstions
Thanks
Echeb

[dflak]

You may get a better response if you attach a sample workbook.

Attach a sample workbook. Make sure there is just enough data to demonstrate your need. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are shown, mock them up manually if necessary.

Remember to desensitize the data.

Click on GO ADVANCED and then scroll down to Manage Attachments to open the upload window.