Automating Excel

Hey,

When you open an excel spreadsheet through VB, is there any way to know how many rows there are without having to loop through them yourself?
I need to know the last row of user input.
Thanks,

Assuming entries begin in column A :
Range("A65536").Select
Selection.End(xlUp).Select
MsgBox ActiveCell.Row

Excel has some built in functions for this.

VB Code:

ActiveSheet.Cells.Range.SpecialCells(xlCellTypeLastCell).Row