I'm not 100% sure what your question is; but consider this in case it is
what you are looking for. The following code will keep adding the contents
of TextBox1 to cell A1, one entry per line, every time it is executed.

With Range("A1")
If .Value < "" Then .Value = .Value & vbCrLf
.Value = .Value & TextBox1.Value
End With

Rick


"Zak" wrote in message
...
Hi,

I would like a code to recognise the first non-blank cell and input the
info
into there via a userform. so the person enters the info into a userform
and
then each of the textboxes should go into specified cells in a new sheet.
Each time new info is enterted the old info should still be there and the
new
one should go at the bottom of that etc. please can you kindly provide
code
for one textbox, i will replicate for the rest.

thanks.