Hi
for a column try something like
sub foo()
Dim Lastrow
LastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).row
msgbox lastrow
end sub

--
Regards
Frank Kabel
Frankfurt, Germany


alekm wrote:
Hi,
how can I find last populated (not null) cell in a row (or column)

thanx

alekm