filtering issues - help!

hi all

i have the following macro that filters based on the selected criteria by the user in cell C7 of the "2012 consolidation" worksheet.

i.e. in column C13:C1300 i have a list of ppl names. cell C7 contains a list the user can filter by - cell c12 contains the filter button...however on the worksheet "2012 consolidation" the macro does not filter!!

can someone pls help?!

Sub Filter_name()
    Dim c As Long
    
        Application.ScreenUpdating = False
    
    With Range("_Data").CurrentRegion
        .AutoFilter
        For c = 1 To .Columns.Count
            .AutoFilter Field:=c, VisibleDropDown:=False
        Next c
        .AutoFilter Field:=3, Criteria1:=Range("Link").Value, VisibleDropDown:=False
    End With
    
        Application.ScreenUpdating = False
    
    Range("Header") = "Filtered by: NAE Name"
    
End Sub

thx u so much...ive been struggling with this for the past 3 days!