Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Text zwischen zwei bestimmten Zeichen entfernen

Text zwischen zwei bestimmten Zeichen entfernen
05.07.2019 08:23:43
Tim
Hallo zusammen,
ich bin (mal wieder) auf Eure Hilfe angewiesen. Generell versuche ich mir erst einmal selber ein Makro zusammen zu stricken, in dem Fall komme ich leider nicht weiter.
Worum es geht: Ich habe einen Text, welcher wie folgt strukturiert ist ...
AA BBBBBBBBBBBBBBBBB CC
Dabei können A, B und C aus beliebig vielen Zeichen bestehen. Wichtig sind hier die Leerzeichen. Nun möchte ich, bzw. soll das Makro den Text zwischen den Leerzeichen(B) entfernen, so dass lediglich noch A und C stehen bleiben. Idealerweise mit nur noch einem Leerzeichen dazwischen, also
AA CC
Vermutlich ist es für den Profi kein großer Aufwand, aber hier komme ich leider wirklich nicht weiter.
Für jeden Tipp, Link oder sogar ein Makro bin ich Euch dankbar!
Danke vorab und viele Grüße!
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text zwischen zwei bestimmten Zeichen entfernen
05.07.2019 08:35:00
Nepumuk
Hallo Tim,
würde ich so machen:
Public Sub Beispiel()
    Dim strText As String
    strText = "AA BBBBBBBBBBBBBBBBB CC"
    strText = Left$(strText, InStr(1, strText, " ")) & Mid$(strText, InStrRev(strText, " ") + 1)
    Debug.Print strText
End Sub

Gruß
Nepumuk
Anzeige
AW: Text zwischen zwei bestimmten Zeichen entfernen
05.07.2019 08:51:28
UweD
Hallo

Sub sdsd()
Dim TextAlt As String, TextNeu As String, Arr
TextAlt = "AA BBBBBBBBBBBBBBBBB CC"
Arr = Split(TextAlt, " ")
TextNeu = Arr(0) & " " & Arr(2)
MsgBox TextNeu
End Sub

LG UweD
AW: Text zwischen zwei bestimmten Zeichen entfernen
05.07.2019 09:08:53
Tim
Vielen vielen Dank an Euch! Es funktioniert einwandfrei! Nochmals Danke für die schnelle Hilfe! :)
Anzeige
;
Anzeige
Anzeige

Infobox / Tutorial

Text zwischen zwei bestimmten Zeichen entfernen in Excel


Schritt-für-Schritt-Anleitung

Um Text zwischen zwei bestimmten Zeichen in Excel zu entfernen, kannst du ein einfaches Makro verwenden. Hier ist eine Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Klicke auf Einfügen und dann auf Modul, um ein neues Modul hinzuzufügen.
  3. Füge den folgenden Code in das Modul ein:
Public Sub Beispiel()
    Dim strText As String
    strText = "AA BBBBBBBBBBBBBBBBB CC"
    strText = Left$(strText, InStr(1, strText, " ")) & Mid$(strText, InStrRev(strText, " ") + 1)
    Debug.Print strText
End Sub
  1. Schließe den VBA-Editor und gehe zurück zu Excel.
  2. Führe das Makro aus, um das Ergebnis zu sehen.

Das Ergebnis wird AA CC sein, wobei der Text zwischen den Leerzeichen entfernt wurde.


Häufige Fehler und Lösungen

  • Fehler: "Komponente nicht gefunden" beim Ausführen des Makros.

    • Lösung: Überprüfe, ob du das Makro in der richtigen Arbeitsmappe gespeichert hast und dass die Sicherheitsstufe für Makros korrekt eingestellt ist.
  • Fehler: Das Ergebnis ist nicht wie erwartet.

    • Lösung: Stelle sicher, dass der Text, den du bearbeitest, die korrekte Struktur hat (zwei Leerzeichen mit Text dazwischen).

Alternative Methoden

Wenn du kein Makro verwenden möchtest, gibt es auch alternative Methoden, um Text zwischen zwei Zeichen in Excel zu entfernen. Eine Möglichkeit ist die Verwendung von Formeln:

  1. Angenommen, der Text steht in Zelle A1. Verwende die folgende Formel:
=LINKS(A1;FINDEN(" ";A1)-1) & " " & RECHTS(A1;LÄNGE(A1)-FINDEN(" ";A1;FINDEN(" ";A1)+1))

Diese Formel schneidet den Text zwischen den Leerzeichen aus und gibt das gewünschte Ergebnis zurück.


Praktische Beispiele

Hier sind einige praktische Beispiele für das Entfernen von Text zwischen Zeichen:

  • Beispiel 1:

    • Eingabetext: 22 444555666 88
    • Ergebnis: 22 88
  • Beispiel 2:

    • Eingabetext: Hallo Welt Test
    • Ergebnis: Hallo Test

Diese Beispiele zeigen, wie du den Excel-Text ausschneiden zwischen zwei Zeichen kannst, um effizienter zu arbeiten.


Tipps für Profis

  • Wenn du oft mit solchen Textformatierungen arbeitest, erwäge die Erstellung eines benutzerdefinierten Makros, das du leicht anpassen kannst.
  • Nutze die Debug.Print-Funktion, um Zwischenergebnisse während der Entwicklung deines Makros anzuzeigen.
  • Experimentiere mit Split-Funktion, um flexibler Textteile zu bearbeiten.

FAQ: Häufige Fragen

1. Kann ich das Makro auch auf andere Zellen anwenden?
Ja, du kannst das Makro so anpassen, dass es auf einen Zellbereich angewendet wird, indem du Schleifen verwendest.

2. Funktioniert das auch in Excel Online?
Leider unterstützen Excel Online keine VBA-Makros. Du musst die Desktop-Version verwenden.

3. Was mache ich, wenn mein Text mehr als zwei Leerzeichen hat?
Du kannst die Replace-Funktion verwenden, um mehrere Leerzeichen in ein einzelnes Leerzeichen zu konvertieren, bevor du das Makro ausführst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige