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