I have a VBA as below
Sub Macro2()
Dim x As String
x = ActiveSheet.Range("a1").Value
ActiveSheet.PivotTables("PivotTable9").PivotFields("item").ClearAllFilters
ActiveSheet.PivotTables("PivotTable9").PivotFields("item").CurrentPage = x
End Sub
It works well but it filter only one cell.
How can I filter the pagefield more than one cell?
Sub Macro2()
Dim x As String
x = ActiveSheet.Range("a1").Value
ActiveSheet.PivotTables("PivotTable9").PivotFields("item").ClearAllFilters
ActiveSheet.PivotTables("PivotTable9").PivotFields("item").CurrentPage = x
End Sub
It works well but it filter only one cell.
How can I filter the pagefield more than one cell?