Using LTrim, RTrim, and Trim to Trim Spaces from a String
Sub TrimDemo() Dim strUntrimmed As String, strTrimmed As String strUntrimmed = Selection.Text strTrimmed = Trim(strUntrimmed) End Sub