Hi All,
I am trying to create a loop that checks each cells' value in the designated range and if it contains "XYZ" then execute the code provided. I want the code to read "XYZ" as insensitive, not match exactly "XYZ", but be able to match "xyz" ,"XyZ", etc.
Here's an example:
A = Cells(Rows.Count, 1).End(xlUp).Row + 1
Do
A = A - 1
If Cells(A, 4).Value Like "*XYZ*" Then
Rows(A).EntireRow.Cut
Worksheets("Removed").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Insert Shift:=xlDown
End If
Loop Until A = 1
Bookmarks