Find the first blank row

[hawley]

I have a worksheet full of data. Some how not all the rows were cleared out so I have a huge gap between the current data and the old data. I would like to find the last row of the current data which is, 364, but I am finding the last row of all the data which is, 4574. How do I get 364? Reason is because I want to clear everything from 365 down.

I have tried....
Cells(4, 11).Select
lngLastRow = Cells.Find("", SearchOrder:=xlByRows, SearchDirection:=xlNext).Row

Cells(4, 11).Select
lngLastRow = Cells(Rows.Count, 11).End(xlUp).Row

Thanks in advanced.

 

[Michael M]

try

Sub test()
Dim lr As Range
Set lr = Cells(4, 11).End(xlDown).Offset(1, 0)
lr.Select
End Sub

 

[hawley]

Michael -

That worked great. Thanks!!

 

[Michael M]

my pleasure...