It is still not all that clear what you are after so if this doesn't
work try to give a more detailed explanation of what it is you want to
achieve. This assumes you have data in column A. It checks the last cell
in Column B and if this is empty inserts a 0:

Sub lrow()
Dim eRow As Long
eRow = Cells(Rows.Count, 1).End(xlUp).Row
With Cells(eRow, 2)
If .Value = Empty Then .Value = 0
End With
End Sub

Regards
Rowan

limshady411 wrote:
Thanks...this didn't work, but good try. I guess maybe, all I need is
to make sure that in the last row of a spreadsheet, if it is an empty
cell, make it a 0. This might be easier. Any ideas? Thanks everyone.