Update Query - Remove carrier returns

[zashaikh]

Actually, I reimported my data. Originally, I had it in Excel, which is where the carrier returns came from. It was easier to remove the returns and spaces from Excel. But I do have a related question.



In my long text field, I was to remove all return carriages After_Update.


In your post above, you identify this code:


Sub xspace()
'chr(10) new line LF
'chr(13) carriage return
Dim x As String: x = "a" & "a" & Chr(13) & Chr(10) & " 2017ghjkl plkjhgfd" & Chr(13) & Chr(10) & "axxx"

x = Replace(x, "a", "")
Debug.Print "1 " & x

x = Replace(x, Chr(13) & Chr(10), "")
Debug.Print "2 " & x

x = Replace(x, " ", "")
Debug.Print "3 " & x
End Sub


I am very confused as to whats going on here. What is the "ghjkl plkjhgfd" and "axxx"?

Is there not a simple code like "vbProperCase(Me.Details)"

[June7]

Orange is just building a string value to use as example data for the code to act on. You would instead reference your control to get a value. Adapt code for your situation.

So code in your After_Update event could be:

Sub yourtextboxname_AfterUpdate()
Me.yourtextboxname = REPLACE(REPLACE(Me.yourtextboxname, Chr(13) & Chr(10),"")," ","")
End Sub