Hey Brandon!
Sorry for the late reply here. You're on the right track, but you need to set your filter equal to something:
Assuming that you're trying to set the page field, of course.Code:Sub Tourname() ' ' To filter PT by tour ' ' wrkshtpt.PivotTables("PivotTable1").PivotFields("Tour name").ClearAllFilters wrkshtpt.PivotTables("PivotTable1").PivotFields("Tour name").CurrentPage = Worksheets("wrkshtcmw").Range ("B1").Value End Sub
Hope things are well with you!
Bookmarks