Look for each listbox item in .UsedRange

[SIMBAtheCAT]

Hi, Good morning,

So basically everything is in the title! I have a userform with a ListBox and I'm trying to refer to each particular item in the Listbox for a range but it doesn't work.

For Each ws In Worksheets
    For i = 400 To 18 Step -1
    
        For a = 1 To 20
        If ws.Cells(i, 1).Value = UserForm2.ListBox2.List(a) Then
        Next a
        
        Else
         
            ws.Cells(i, 1).EntireRow.Delete
            
        End If
    Next i
Next ws