Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Alle überflüssigen Leerzeichen im Arbeitsblatt löschen

Gruppe

Bearbeiten

Problem

Wie kann ich auf einen Schlag alle überflüssigen Leerzeichen in einem Arbeitsblatt löschen?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: Modul1

Sub Glaetten()
    With ActiveSheet.UsedRange
        .Cells.Value = Application.Trim(.Cells.Value)
    End With
End Sub