VBA Help - AutoFill Function

I have an excel spreadsheet, looks like the following:

Date/Day/Data/Data/Data

The data is updated daily and I usually scroll down click on the last row updated and then autofill the entire next row. I'm looking to this through VBA coding. Since it is updated daily I need the code to find the last row (there aren't really in blanks) and auto fill down to the next one. Can anyone help?

Do some function to check the last row

e.g.

public function last_row () as integer
LR="ini"
do while LR <> ""
'do here for checking
x=x+1
loop
last_row=x
end function