Rowkount

[Guest]

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?

 

[Guest]

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.

 

[Glen Mettler]

This will count the last row with data and ignore blank cells in between.

LastRow = Cells(Rows.Count, 1).End(xlUp).Row

(where 1 is the first column. to check LastRow in column C you enter 3)

Glen