Carriage Return Character in Field

[DRANDON]

Hello all. I have a Userform with a text field for user data input. I've enabled EnterKeyBehavior to ease user input formating (make a new line if they want).
Problem is when they are done the field where the data is written to on the main sheet now contains squares wherever they pressed the enter key.

Any way of eliminating this?

Thanks a lot.

 

[Kenneth Hobson]

Did you want the new line? If you do, replace vbcrlf with vblf.

Sub t()
  [a2] = "Hello" & vbCrLf & "World!"
  [a2] = Replace([a2], vbCrLf, vbLf)
End Sub

 

[Andrew Poulsom]

This worked for me:

Private Sub CommandButton1_Click()
    Range("A1").Value = Replace(TextBox1.Text, Chr(13), "")
End Sub

 

[DRANDON]

Range("b22").Value = Replace(PayerCodes_TB.Text, Chr(13), "")

Worked perfectly, U rock.