Search Cell Value Delete if Not in Named Range

I am pretty new to VBA I am basically trying to search all the cell values in column K of multiple sheets. If the value in column K is not found in my named range I want it to delete the entire row. Any help is greatly appreciated!!!!

Sub Delete()
    
If ActiveSheet.Name = "Tracking System Compliance" Then
Range("J:J").Select

Else: Range("K:K").Select
End If

'need code here to delete the values not found in the named range "tabmodels"

        If Not c Is Nothing Then c.EntireRow.Delete
    Loop While Not c Is Nothing
End Sub