How to Remove Line Break in String

excel, vba

Solution

`vbCrLf` and `vbNewLine` are actualy two characters long, so change to `Right$(myString, 2)`

Sub linebreak(myString)
    If Len(myString) <> 0 Then
        If Right$(myString, 2) = vbCrLf Or Right$(myString, 2) = vbNewLine Then 
            myString = Left$(myString, Len(myString) - 2)
        End If
    End If
End Sub

Problem

I want to Remove the Line Break from the string if my string Ends with Line Break. ``` Sub linebreak(myString) If Len(myString) <> 0 Then If Right$(myString, 1) = vbCrLf Or Right$(myString, 1) = vbNewLine Then myString = Left$(myString, Len(myString) - 1) End If End Sub ```

Original source