Hi I have this code which removed all values in a column where it does not equal successful but I am not sure how to amend it for another purpose.
I would like to define a number of specific values and move these to another sheet in the spreadsheet where the following conditions are met:
the cell value does not equal @bewx.com
the cell value contrains xxx.xxx@
If either of these are contained in any value in column D can it be copied (the whole row) from the current worksheet to another worksheet called None?
Can these be worked in to the code in anyway?
lRow = 3000
Do While lRow >= 2
If Cells(lRow, 9) <> "Successful" Then Rows(lRow).Delete
lRow = lRow - 1