WorksheetFunction.Trim (Excel)

Entfernt alle Leerzeichen aus Text, nur keine einzelnen Leerzeichen zwischen Wörtern.

Trim (Arg1)

Arg1: Text – der Text, aus dem Leerzeichen entfernt werden sollen.

Dim strArg1 As String: strArg1 = 
Dim strTrimmed As String
strTrimmed = WorksheetFunction.Trim(Arg1:=strArg1)