last record

[missing]

Hello everyone,
i need help
i have table and when i start macro, i need, that it find last emty row in table and fill data in it.

NAME AGE ***
JOHN 18 MALE
LUKE 20 MALE

fill data after LUKE and etc...

[mudraker]

Here are a codes to assit you

They all find the last used row - you will need to add 1 to result to get the vacant row number

find last used row in column A before a vacant cell - this will not be the very last used row in column A if you have vacant cells foloowed by more data.
LastRow = Range("A1").End(xlDown).Row

This finds the last used cell in Column A
LastRow = Cells(Rows.Count, "a").End(xlUp).Row

This finds the last used row regardless of which column it is in.
GetBottomRow = TheSheet.Cells.Find(what:="*", searchorder:=xlByRows, _
searchdirection:=xlPrevious).Row


This finds the last used column regardless of which rowit is in.
LastColumn = TheSheet.Cells.Find(what:="*", searchorder:=xlByColumns, _
searchdirection:=xlPrevious).Column