Haben Sie viele Daten, die Leerzeichen enthalten, und müssen Sie diese Leerzeichen entfernen? Vielleicht haben Sie es aus einem anderen Programm importiert oder die Leerzeichen wurden versehentlich eingegeben. Beispielsweise kann ein Arbeitsblatt eine große Anzahl von Richtliniennummern enthalten, und die Richtliniennummern enthalten Leerzeichen. Wenn Sie diese Leerzeichen entfernen möchten, können Sie zwei Ansätze verwenden.

Der erste Ansatz ist die Verwendung der SUBSTITUTE-Funktion. Angenommen, eine Richtliniennummer befindet sich in Zelle A5. In Zelle B5 können Sie diese Formel verwenden:

=SUBSTITUTE(A5," ","")

Das Ergebnis ist, dass Zelle B5 die Richtliniennummer enthält, wobei alle Leerzeichen entfernt wurden.

Der zweite Ansatz funktioniert gut, wenn Sie viele Zellen mit Leerzeichen haben und diese in einem Schritt entfernen möchten. Erstellen Sie das folgende Makro:

Sub NoSpaces()

Dim c As Range

For Each c In Selection.Cells         c = Replace(c, " ", "")

Next End Sub

Wählen Sie die Zellen aus, die Sie ändern möchten, und führen Sie das Makro aus. Es untersucht jede Zelle im ausgewählten Bereich und entfernt alle Leerzeichen in diesem Bereich. Das Ergebnis wird dann wieder in dieselbe Zelle gestellt.

Ein letzter Hinweis: Möglicherweise fragen Sie sich, ob Sie die TRIM-Funktion verwenden möchten. Diese Arbeitsblattfunktion ist hilfreich beim Entfernen überschüssiger Leerzeichen, kann jedoch nicht zum vollständigen Entfernen von Leerzeichen verwendet werden, wie in diesem Tipp beschrieben.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (10741) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365. Eine Version dieses Tipps für die ältere Menüoberfläche von Excel finden Sie hier: