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.

_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 (3037) gilt für Microsoft Excel 97, 2000, 2002 und 2003. Eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Excel (Excel 2007 und höher) finden Sie hier: