VBA - search multiple values in a column of text

[MTrip]

I have a list of key words in column A in Range A2:A11.

In column B (Range B2:B2334) I have text (1 paragraph in each cell). For each cell in column B, I want to check if any of the words in column A are included.

Thank you for your help. Manish

 

[JLGWhiz]

This could take a few seconds to run. It will highlight cells in column B which have matching text.

Sub t()
Dim i As Long, j As Long
    For i = 2 To 2334
        For j = 2 To 11
            If InStr(Cells(i, 2).Value, Cells(j, 1).Value) > 0 Then
                Cells(i, 2).Interior.Color = vbYellow
                Exit For
            End If
        Next
    Next
End Sub

 

[MTrip]

Thank you JLGWhiz for your help.

 

[JLGWhiz]

Thank you JLGWhiz for your help.

You're welcome,
Regards, JLG