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

Forumthread: Bereich aus Textstring ausschneiden

Bereich aus Textstring ausschneiden
Jürgen
Hallo Helfer,
ich habe in einer Zelle den Text stehen:
Lp_5692-89x-03_D4/Unten
Nun möchte ich mittels VBA das nur noch der Text: 5692-89x-03 sowie anstelle Unten BTM angehängt wird.
Also komplett heißt es dann:
5692-89x-03 BTM
Welcher Freak bekommt das hin ?
Gruß Jürgen
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Bereich aus Textstring ausschneiden
01.08.2012 21:30:44
Peter
Hallo Jürgen,
angenommen, der Ursprungswert steht in Tabelle1 in Zelle A1, dann so:
Public Sub ausschneiden()
Dim vTemp  As Variant
With ThisWorkbook.Worksheets("Tabelle1")
If InStr(.Range("A1").Value, "_") > 0 Then
vTemp = Split(.Range("A1").Value, "_")
.Range("A1").Value = vTemp(1) & " BTM"
End If
End With
End Sub

Gruß Peter
Anzeige
AW: Bereich aus Textstring ausschneiden
01.08.2012 21:44:03
Jürgen
Hallo Peter,
sehe ich das richtig ?
Der Befehl Split schneidet den Bereich innerhalb eines Zeichens heraus ? in diesem Fall das _ ?
Jürgen
AW: Bereich aus Textstring ausschneiden
01.08.2012 21:59:59
Peter
Hallo Jürgen,
der Befehl Split splittet einen String bei dem angegebenen Zeichen in entsprechend viele Teile.
Hier in Deinem Fall steht in der Variablen vTemp mit Index 0 der Inhalt vor dem ersten Unterstrich, Index 1 der Wert zwischen den beiden Unterstrichen und bei Index 2 der Rest hinter dem 2. Unterstrich.
Gruß Peter
Anzeige
AW: Bereich aus Textstring ausschneiden
01.08.2012 22:16:10
Jürgen
Danke Peter,
wieder was gelernt.
Jürgen
wozu VBA?
02.08.2012 10:54:56
Rudi
Hallo,
 AB
2Lp_5692-89x-03_D4/Unten5692-89x-03 BTM

ZelleFormel
B2=LINKS(TEIL(A2;FINDEN("_";A2)+1;99);FINDEN("_";TEIL(A2;FINDEN("_";A2)+1;99))-1) & " BTM"

Gruß
Rudi
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Text aus einem String in Excel ausschneiden


Schritt-für-Schritt-Anleitung

Um einen spezifischen Teil eines Textstrings in Excel auszuschneiden, kannst du VBA oder Excel-Formeln verwenden. Hier ist eine Schritt-für-Schritt-Anleitung für beide Methoden:

Methode 1: Mit VBA

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

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

  3. Füge den folgenden Code ein:

    Public Sub ausschneiden()
        Dim vTemp As Variant
        With ThisWorkbook.Worksheets("Tabelle1")
            If InStr(.Range("A1").Value, "_") > 0 Then
                vTemp = Split(.Range("A1").Value, "_")
                .Range("A1").Value = vTemp(1) & " BTM"
            End If
        End With
    End Sub
  4. Schließe den VBA-Editor und führe das Makro aus.

Methode 2: Mit einer Excel-Formel

  1. Angenommen, der Text steht in Zelle A2. Füge in Zelle B2 die folgende Formel ein:

    =LINKS(TEIL(A2;FINDEN("_";A2)+1;99);FINDEN("_";TEIL(A2;FINDEN("_";A2)+1;99))-1) & " BTM"
  2. Drücke Enter, um das Ergebnis zu sehen.


Häufige Fehler und Lösungen

Fehler 1: "Typen sind nicht kompatibel"

  • Stelle sicher, dass du den richtigen Datentyp verwendest. Der Text muss in einer Zelle stehen, und die Formel sollte korrekt auf diese Zelle verweisen.

Fehler 2: "Makro konnte nicht ausgeführt werden"

  • Überprüfe, ob die Sicherheitsstufe in Excel so eingestellt ist, dass Makros erlaubt sind. Gehe dazu auf Datei > Optionen > Trust Center > Einstellungen für das Trust Center.

Alternative Methoden

Falls du VBA nicht verwenden möchtest, gibt es auch andere Möglichkeiten, Text in Excel auszuschneiden:

  1. Text in Spalten: Wähle die Zelle aus und gehe zu Daten > Text in Spalten. Wähle "Getrennt" und verwende "_" als Trennzeichen.
  2. FILTER-Funktion (Excel 365): Du kannst diese Funktion verwenden, um Daten basierend auf bestimmten Kriterien zu extrahieren.

Praktische Beispiele

Angenommen, du hast den Text Lp_5692-89x-03_D4/Unten in der Zelle A2. Hier sind zwei Beispiele:

  1. VBA Beispiel: Führe das oben gegebene VBA-Skript aus, um 5692-89x-03 BTM zu erhalten.

  2. Excel-Formel Beispiel: Verwende die Formel in Zelle B2, um den gleichen Text zu erhalten.


Tipps für Profis

  • Nutze die TEXTVERKETTEN-Funktion (Excel 365), um mehrere Teile eines Textstrings zusammenzufügen.
  • Experimentiere mit verschiedenen Trennzeichen im Split-Befehl, um flexibler zu sein.
  • Halte deine Daten in einer Tabelle organisiert, um die Verwendung von Formeln zu erleichtern.

FAQ: Häufige Fragen

1. Wie kann ich mehrere Trennzeichen in einem String verwenden? Du kannst den Split-Befehl in VBA anpassen, um mehrere Trennzeichen zu akzeptieren, indem du eine Schleife verwendest.

2. Funktioniert das auch in älteren Excel-Versionen? Die VBA-Methode funktioniert in allen Excel-Versionen, jedoch können einige Formeln in neueren Versionen besser unterstützt werden.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige