Remove rows if cell is empty - weird issue

[Sdwd76]

Using the below.
Works as required however the last rows where there is black M the rows are not deleted?

Sub emptyx()

Dim lastRow As Long, i As Long

lastRow = Cells(Rows.Count, "M").End(xlUp).Row

For i = lastRow To 2 Step -1

If Range("M" & i) = "" Then
Rows(i).Delete
End If

Next i

End Sub

 

[Fluff]

If there are "blank" cells in col M not being deleted, my guess is that they are not really blank.