Range("A" & Cells(Rows.Count,"A").End(xlUp).Row+1)

gives that next free cell

--
HTH

Bob Phillips

"Technoman" wrote in message
...
I am in need of the macro that enables a user to go to the next available
cell in a particular row. I have seen the post on this site before but
cannot find it now i need it.