Die Funktion VBA TRIM gibt eine Zeichenfolge zurück, nachdem Leerzeichen links und rechts von der Zeichenfolge entfernt wurden.
Trim(text)
Entfernen wir zusätzliche Leerzeichen am Anfang und Ende der Zeile:
Sub TrimExample1() MsgBox Trim("test") 'Gibt zurück: „test“ MsgBox Trim(" test") 'Gibt zurück: „test“ MsgBox Trim("test ") 'Gibt zurück: „test“ MsgBox Trim(" test ") 'Gibt zurück: „test“ MsgBox Trim(" test test ") 'Gibt zurück: „test test“ MsgBox Trim(" ") 'Gibt zurück: "" End Sub
Entfernen zusätzlicher Leerzeichen innerhalb einer Zeile:
Sub TrimExample2() MsgBox WorksheetFunction.TRIM(" test test ") 'Gibt zurück: „test test“ End Sub