Try this:

Sheets("blah").Range("A" & ActiveCell.row + 1).Select
Selection = textbox.Value



"unclescrooge" wrote in message
ups.com...
On Mar 6, 11:54 am, "PCLIVE" wrote:
If "blah" is your active sheet and Cell A1 is the active cell and
starting
point, then you may try using:

ActiveCell.Value = "text"
ActiveCell.Offset(1, 0).Select

If you always want the next empty cell in column A, then you may try
something like:

ActiveSheet.Range("A65536").End(xlUp).Offset(1, 0).Select

HTH,
Paul

"unclescrooge" wrote in message

ups.com...



okay..now i know how to take text content and add it to cells.

i need the Sheets("blah").Range("A1") to change cells to the next row.
how would i go about doing that?

in other words...i need it to write to cell A1, then A2 the next time
enter is pushed, A3, the third time, etc...

thanks!
john- Hide quoted text -

- Show quoted text -

Hi Paul,

Thanks, just so I'm clear...

after the Sheets("blah").Range("A1") = textbox.Value

i would add the

ActiveCell.Value = "text"
ActiveCell.Offset(1, 0).Select

portion to the coding?

thank you again!
john