Last row in particular column of worksheet

[confusion123]

I use this to find the last row on a particular worksheet:

lrow = wks.Cells.Find(What:="*", _
                              After:=Cells(Rows.Count, Columns.Count), _
                              SearchDirection:=xlPrevious, _
                              SearchOrder:=xlByRows).Row

but what if I don't want to find the last row on a worksheet but only the last row in a specific column in that worksheet?

For example the last entry in column A is in row 100 but the last entry in column D is 10, so I want my function to return 10?

I tried changing:

lrow = wks.Cells.Find(What:="*", _
                              After:=Cells(Rows.Count, 10), _
                              SearchDirection:=xlPrevious, _
                              SearchOrder:=xlByRows).Row

but it didn't help.

Thanks

 

[bbott]

lrow = Range("A" & Rows.Count).End(xlUp).Row

 

[Mike LH]

Hi,

Using your method

Lrow = wks.Columns(1).Find(What:="*", _
                              After:=[A1], _
                              SearchDirection:=xlPrevious, _
                              SearchOrder:=xlByRows).Row

 

[confusion123]

lrow = Range("A" & Rows.Count).End(xlUp).Row

Thanks

Hi,

Using your method

Lrow = wks.Columns(1).Find(What:="*", _
                              After:=[A1], _
                              SearchDirection:=xlPrevious, _
                              SearchOrder:=xlByRows).Row

Afraid your suggestion didn't work.

 

[bbott]

Thanks.

You're welcome.