View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Ron de Bruin Ron de Bruin is offline
external usenet poster
 
Posts: 11,123
Default Find the last used Row on a Worksheet

Hi K Dales

This is only working if you have data in the first row of your sheet

You can use this to find the last row with data

Firstrow = ActiveSheet.UsedRange.Cells(1).Row
Lastrow = ActiveSheet.UsedRange.Rows.Count + Firstrow - 1
--
Regards Ron de Bruin
http://www.rondebruin.nl


"K Dales" wrote in message ...
The UsedRange property of the worksheet will get it for you:
LastRow = Worksheets(SheetName).UsedRange.Rows.Count
(this gives the last used row, the blank row would be this plus one)

"poppy" wrote:


Hi Experts

Is it possible for me to select the blank row immediately after the
last used row? I am trying to do something like this, but it's not
working:


Code:
--------------------
lastrow = Cells(Rows.count, "B").End(xlUp).Row
lastrow2 = lastrow + 2
Range("A65536").End(xlToRight).Select = "lastrow2"

OR

Range("lastrow2").End(xlToRight).Select

--------------------


Kind Regards


--
poppy
------------------------------------------------------------------------
poppy's Profile: http://www.excelforum.com/member.php...o&userid=11453
View this thread: http://www.excelforum.com/showthread...hreadid=320060