How do I select the last line

[ATLGator]

I am trying to select the last line of a database, columns A thru E. So far, I've figured out that I can select the last cell in the row with:

Rows.End(xlDown).Select

but how do I select the entire line of data in the last row?

Thanks.

[antoka05]

You could use this code:

   Dim lastRow As Long
   lastRow = Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
   Rows(lastRow).Select

Regards,
Antonio

[ATLGator]

antoka05 - Thanks, I only wanted to select the last row in columns A thru E since that's how far out the database goes. Your solution seems to select the last row, but the entire row. However, you did spark an idea and I figured it out. Thanks.

    CourseCount = WorksheetFunction.CountA(Range("$A:$A"))
    Range("A" & CourseCount & ":E" & CourseCount).Select