VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Überflüssige Leerzeichen in einem vorgegebenen Bereich löschen

Gruppe

Allgemein

Bereich

Zeichenfolge

Thema

Überflüssige Leerzeichen in einem vorgegebenen Bereich löschen

Problem

Die überflüssigen Leerzeichen in einem vorgegebenen Bereich sollen gelöscht werden.

Lösung

Den nachstehenden Code in ein Standardmodul eingeben, einer Schaltfläche zuweisen und starten.




StandardModule: Modul1

Sub KillSpaces()
   Dim rng As Range
   For Each rng In ActiveSheet.UsedRange
      rng.Value = WorksheetFunction.Trim(rng.Value)
   Next rng
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Allgemein und Zeichenfolge