Try something like:

Dim strLastCell as String
strLastCell = Activesheet.Range("A65536").End(xlUp).Address

msgbox strLastCell

You can also change "Address" to "Row" if preferred. To get the next
available cell below the last used cell use:

Dim strLastCell as String
strLastCell = Activesheet.Range("A65536").End(xlUp).Offset(1, 0).Address

Hope this helps.


"Ray" wrote:

I am trying to find the last row in a spreadsheet that contains data. The
range.count function stops when it hits a blank cell? Is there a quick and
dirty way to find the row# (or address) of the last cell in a worksheet that
contains data without worrying about blank cells?
--
Ray