VBA - Как я могу l oop через строки, ища 2 значения, которые могут быть в любом столбце

Question

VBA - Как я могу l oop просмотреть строки, ища 2 значения, которые могут быть в любом столбце, если он найдет два значения в одной строке, выделите строку. В этом случае мне нужно выделить, если в строке есть Инспектор и Приемник. На этом листе почти 10000 строк.

Образец данных

Вот то, что я имею до сих пор. Это позволяет мне пролистать oop и выделить одно значение, но не два.

Sub Highlight_Conflicting_roles()
endrow = Range("A" & Rows.Count).End(xlUp).Row

For Each Row In Range("A5:A" & endrow)
If Row.Value = "Inspector" Then
cell.EntireRow.Interior.ColorIndex = 5
End If
Next

End Sub

Answer 1

Много вариантов, вот один:

Sub Highlight_Conflicting_roles()
    Dim endRow as Long
    endRow = Range("A" & Rows.Count).End(xlUp).Row

    Dim i As Long
    For i = 5 to endRow
        If Application.CountIf(Rows(i), "Inspector") > 0 And _
           Application.CountIf(Rows(i), "Receiver") > 0 Then
            Rows(i).Interior.ColorIndex = 5
        End If
    Next
End Sub