Как удалить разрыв строки в строке

Я хочу удалить разрыв строки из строки, если моя строка заканчивается разрывом строки.

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