in a multiline textbox, is there an easier way to write the data to the
worksheet than this? right now i use 2 spaces as a delimiter for the end of
line.

arr = Split(tbMessage, " ")
For i = LBound(arr) To UBound(arr)
Range("C" & rw).Value = arr(i) & " "
rw = rw + 2
Next


i also read the data into the form first using the following on activate:

Me.tbMessage = Range("c27").Value & Range("c29").Value & _
Range("c31").Value & Range("c33").Value & Range("c35").Value
--


Gary