VBA code to do a filter across multiple sheets

[gmazza76]

Good morning

I currently am using the VB code below to manage 3 pivot table in a sheet feeding from different sources using slicers
The below code looks at the filters based on a pivot table and then aligns the other tables accordingly.

The issue I am looking at currently is I need to apply a filter based on the "Team Lead" which will work in the initial pivot table by the slicer, but when I come to mirror it in the other tables I am having an issue as "Team Lead" isn't a filter option as it is an output in the "Rows" of the pivot table and I cant move this due to the visuals produced in the image below

Is there a way of selecting the Manager based on the C18 reference without it being a filter option

Sheets("Sheet1").Select
        Range("K27").Select
            Set pvFld = ActiveSheet.PivotTables("PivotTable1").PivotFields("Team Lead")
                strFilter = ActiveWorkbook.Sheets("Customer Experience").Range("C18").Value
                    pvFld.CurrentPage = strFilter

thanks in advance