Searching through worksheet for a list of items

It would work to simply write "Match" in column B if the row contains any of the items in the search list.

Thanks

Thank you. This worked great on my sample file. I'll play around with it tonight on my large file.

I am getting an error if one of the Visit Rows does not have a matching item in the Codes sheet.

I have tried different ways of checking to see if NameDic.Items(K).Keys has values, but I cannot find the proper syntax.

Please Login or Register  to view this content.

Would that be the best way to deal with rows that don't have a match?

Thanks

Originally Posted by Brandon2013

It would work to simply write "Match" in column B if the row contains any of the items in the search list.

According to your attachment a demonstration as a beginner starter :

PHP Code: 

Sub Demo()
     Dim V2, M$(), V1, R&, C%, S$()
         V2 = Sheet2.Range("A2", Sheet2.[A1].End(xlDown)).Value2
    With Sheet1.UsedRange.Rows("2:" & Sheet1.UsedRange.Rows.Count).Columns
            ReDim M(1 To .Rows.Count, 0)
            V1 = .Item(3).Resize(, .Count - 2).Value2
        For R = 1 To UBound(V1)
            For C = 1 To UBound(V1, 2)
                If IsEmpty(V1(R, C)) Then Exit For
                S = Split(LTrim(V1(R, C)))
                If S(0) Like "S##" Or IsNumeric(Application.Match(S(0), V2, 0)) Then M(R, 0) = "Match": Exit For
            Next
        Next
            .Item(2).Value2 = M
    End With
End Sub 


Do you like it ? So thanks to click on bottom left star icon « ★ Add Reputation » !

Thank you.