Finding first empty row in Excel 10.1.5

I am currently using this script to find the the first empty row in a spreadsheet. Basically the spreadsheet is a running log of data and I always want the next entry it makes to be just after the previous entry made the day before (the script gathers data nightly via CronniX).

But after running this script since 2006 I watched it the other day and realized how inefficient it is, since there are hundreds of rows of data it has to cycle through. I figure there must be some easier and efficient way to do this, but I’m at a loss. Any ideas?

			--find next empty cell to begin data entry
			repeat until Formula of ActiveCell is ""
				set currentRow to (currentRow + 1)
				set currentCell to ("R" & currentRow & "C" & currentColumn) as text
				Select Range currentCell
			end repeat

Hi Kevin,

does this help

tell application "Microsoft Excel"
	tell active sheet to set firstEmptyRow to (count rows of used range) + 1
end tell