Find text in a cell

[MBCMDR]

Hello,

Basic I load a worksheet and search Column 41, I use row count is value (I) so only get the rows with matching data. This work great if I only have one value in that cell. If I have that same value and coma spaced with other data it over looks it, so I am after an If statement that with also check text of comma space for the value for the text inside a cell with comma spaced data.

Data ( 235100, 242344, 243210, 331011)


Dim LastRow, Limit1 As Long
Dim Found As Range
Dim getrow, FindATA As String

Set ws = Sheets("ATACODE")

LastRow = ws.Cells(ws.Rows.Count, "D").End(xlUp).row

FindATA = "242344"

If ws.Cells(i, 41).Value = FindATA Then
If ws.Cells(i, 13).Value <>COMP Then

******** code ********
getrow = i
c = c + 1

End If
End If

Next I




MBCMDR

[nilem]

maybe this

Please Login or Register  to view this content.

[AlphaFrog]

Change this...

Please Login or Register  to view this content.

To This...

Please Login or Register  to view this content.