Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Makro Leerzeichen im markierten bereich entfernen

Makro Leerzeichen im markierten bereich entfernen
18.12.2008 14:03:48
Christian
Hallo liebe Com.
ich hab mal wieder eine frage.
ich brauch ein makro das in meinen markierten zellen die Leereichen NUR links und rechts entfernt!
mit rtrim ging das irgendwie nicht...!? hoffentlich kann mir jemand helfen...
gruß christian
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro Leerzeichen im markierten bereich entfernen
18.12.2008 14:13:22
Daniel
Hi
wenn es RTRIM gibt, dann gibts vielleicht auch LTRIM und TRIM, einfach mal ausprobieren.

Sub test()
Dim Zelle As Range
For Each Zelle In Selection
Zelle.Value = Trim(Zelle.Value)
Next
End Sub


Gruß, Daniel

AW: Makro Leerzeichen im markierten bereich entfernen
18.12.2008 16:05:10
Christian
Danke!
habs so abgeändert!

Sub LeerzeichenEntf()
Dim Zelle As Range
For Each Zelle In Selection
Zelle.Value = LTrim(Zelle.Value)
Zelle.Value = RTrim(Zelle.Value)
Next
End Sub


gruß christian

Anzeige
AW: Makro Leerzeichen im markierten bereich entfernen
18.12.2008 16:25:03
Daniel
Hi
und warum nicht gleich nur TRIM verwenden?
Gruß, Daniel
AW: Makro Leerzeichen im markierten bereich entfernen
18.12.2008 16:33:00
Gerd
Hi,
einfach nut Trim$ verwenden.
mfg Gerd

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Makro zum Entfernen von Leerzeichen in Excel


Schritt-für-Schritt-Anleitung

Um ein Makro zu erstellen, das Leerzeichen nur links und rechts in markierten Zellen entfernt, kannst du die folgenden Schritte ausführen:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke im Menü auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Füge den folgenden VBA-Code in das Modul ein:

    Sub LeerzeichenEntf()
        Dim Zelle As Range
        For Each Zelle In Selection
            Zelle.Value = Trim(Zelle.Value)
        Next
    End Sub
  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Markiere die Zellen, in denen du die Leerzeichen entfernen möchtest.

  6. Drücke ALT + F8, wähle LeerzeichenEntf aus und klicke auf Ausführen.


Häufige Fehler und Lösungen

  • Fehler: Das Makro entfernt nicht die Leerzeichen.

    • Lösung: Stelle sicher, dass du Trim anstelle von RTrim oder LTrim verwendest. Trim entfernt sowohl führende als auch nachfolgende Leerzeichen.
  • Fehler: Das Makro wird nicht ausgeführt.

    • Lösung: Überprüfe, ob die Zellen tatsächlich markiert sind und dass du im richtigen Arbeitsblatt arbeitest.

Alternative Methoden

Falls du keine Makros verwenden möchtest, kannst du die Funktion TRIM direkt in Excel verwenden:

  1. Wähle eine leere Zelle aus.

  2. Verwende die Formel:

    =TRIM(A1)
  3. Ziehe die Formel nach unten, um sie auf weitere Zellen anzuwenden.

  4. Du kannst die Ergebnisse dann kopieren und mit Inhalte einfügen -> Werte in die Originalzellen einsetzen.


Praktische Beispiele

Angenommen, du hast in den Zellen A1 bis A5 einige Daten mit unerwünschten Leerzeichen:

  • A1: " Test "
  • A2: " Beispiel "
  • A3: " Excel "
  • A4: " VBA "
  • A5: " Makros "

Wenn du das obenstehende Makro ausführst, wird der Inhalt folgendermaßen aussehen:

  • A1: "Test"
  • A2: "Beispiel"
  • A3: "Excel"
  • A4: "VBA"
  • A5: "Makros"

Tipps für Profis

  • Wenn du häufig mit Texten arbeitest, die durch Leerzeichen gestört werden, erwäge, das Makro in die Symbolleiste für den Schnellzugriff aufzunehmen.
  • Du kannst das Makro weiter anpassen, um zusätzliche Funktionen, wie das Entfernen von mehrfachen Leerzeichen innerhalb eines Textes, hinzuzufügen.

FAQ: Häufige Fragen

1. Wie kann ich Makros in Excel aktivieren?
Um Makros zu aktivieren, gehe zu Datei -> Optionen -> Trust Center -> Einstellungen für das Trust Center und aktiviere die Option für Makros.

2. Was ist der Unterschied zwischen Trim und RTrim in VBA?
Trim entfernt sowohl führende als auch nachfolgende Leerzeichen, während RTrim nur die nachfolgenden Leerzeichen entfernt. Daher ist Trim die bessere Wahl, um alle unerwünschten Leerzeichen zu beseitigen.

3. Kann ich das Makro anpassen, um Leerzeichen innerhalb des Textes zu entfernen?
Ja, du kannst das Makro erweitern, um auch mehrfache Leerzeichen innerhalb eines Textes zu entfernen. Verwende dazu eine Kombination aus Replace und Trim.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige