Sub killum()
n = Cells(Rows.Count, 1).End(xlUp).Row
For i = n To 1 Step -1
If Cells(i, 1).Value = "" Then
Cells(i, 1).EntireRow.Delete
End If
Next
End Sub

--
Gary''s Student - gsnu200834


" wrote:

I need a macro to delete the entire row if the cell in that row in column A:A
looks blank. I need it to check every row. I say "looks" because the cells
will be part of a list, however I would still like them to be deleted if they
have a formula if they look as though nothing is in them... Please help...