Hey Guys,

I'm having a little issue deleting entire rows when certain text is found in them, basically if there are two rows next to one another it only deletes one of the offending rows because the second row becomes the first row, I know how to fix it but am unsure how to code it.

My current code is as follows:
    For Each Cell In Columns("I").SpecialCells(xlCellTypeConstants, xlTextValues)
        If InStr(1, Cell.Value, "MOPERA", 1) Then
            Cell.EntireRow.Delete
        End If
    Next Cell
It should be going from bottom to top to avoid this or putting them in a group and then deleting them all at once, could someone help me with this problem.

Thanks in advance
- Hyflex