Otherwise you can

set rng = Range(Cells(1,1),Cells(1,1).End(xldown))
sStr = ""
for each cell in rng
sStr = sStr & cell.Value
Next
Textbox2.Text = sStr
--
Regards,
Tom Ogilvy



Tom Ogilvy wrote in message
...
Textbox2.Text = Textbox1.Text

--
Regards,
Tom Ogilvy

jasonsweeney wrote in
message
...
For giggles,

what would the code be for reconstruction the text inserted in the
column back into a text box in a form?

I enter "See spot run." into the text box in Userform1 above and press
comman button.

In A1:A6 =

A1 See
A2
A3 spot
A4
A5 run
A6 .
_______________
Now in Userform2, in Textbox2, how do we reconstruct "See spot run." in
Textbox2?


---
Message posted from http://www.ExcelForum.com/