Why is Rows(i).EntireRow.Delete deleting the cell instead of the row?
<p>Instead of the entire row being deleted, only cell(i,8) gets deleted. What this code does is, for each cell until the last row, if the cell starts with IM, highlight it, and if a corresponding cell is less than 4, delete the row. Thanks</p>

<pre><code>for i = 1 to LastRow Then
    If Left(Cells(i, 1), 2) = "IM" Then
        Cells(i, 1).Interior.Color = RGB(140, 220, 100)
        If Cells(i, 8).Value &lt;= 4 Then
            Rows(i).EntireRow.Delete
        End If
    End If
next i
</code></pre>