Delete enter key rectangles in a cell.

M

Maths1

I am using a Textbox on a form to enter data into a cell.

Code:
ActiveCell=UserForm1.TextBox1.Text

When the user presses ENTER in the TextBox small rectangles appear in the
cell.
How do I prevent this happening?

Thanks for any help!

OS is XP and Excel 2003
 
P

Peter T

It's very hard to suggest anything with so little information, eg what's the
state of MultiLine & WordWrap in the textbox and WordWrap in the cell, what
occurs when user presses Enter (normally that will simply exit the text
box), or is that control enter, where is the code (in which event), etc, etc

here's a long shot guess

ActiveCell = Replace(Me.TextBox1.Text, vbCrLf, vbLf)

Regards,
Peter T
 
M

Maths1

Thank you for the prompt reply.

Your long shot was a direct hit - Fantastic!
The textbox EnterKeyBehaviour, MultiLine & WordWrap are set to TRUE and also
WordWrap in the cell. The user transfers the text to the Sheet using a
CommandButton click event.

Many thanks again
 
Top