Hi, try this one (column E); a is a variable.

a=Activesheet.Cells(1, "E").End(xlDown).Row + 1