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
| A | B | |
| 2 | Lp_5692-89x-03_D4/Unten | 5692-89x-03 BTM |
| Zelle | Formel |
| B2 | =LINKS(TEIL(A2;FINDEN("_";A2)+1;99);FINDEN("_";TEIL(A2;FINDEN("_";A2)+1;99))-1) & " BTM" |
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
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.
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 SubSchließe den VBA-Editor und führe das Makro aus.
Methode 2: Mit einer Excel-Formel
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"Drücke Enter, um das Ergebnis zu sehen.
Fehler 1: "Typen sind nicht kompatibel"
Fehler 2: "Makro konnte nicht ausgeführt werden"
Datei > Optionen > Trust Center > Einstellungen für das Trust Center.Falls du VBA nicht verwenden möchtest, gibt es auch andere Möglichkeiten, Text in Excel auszuschneiden:
Daten > Text in Spalten. Wähle "Getrennt" und verwende "_" als Trennzeichen.Angenommen, du hast den Text Lp_5692-89x-03_D4/Unten in der Zelle A2. Hier sind zwei Beispiele:
VBA Beispiel:
Führe das oben gegebene VBA-Skript aus, um 5692-89x-03 BTM zu erhalten.
Excel-Formel Beispiel: Verwende die Formel in Zelle B2, um den gleichen Text zu erhalten.
TEXTVERKETTEN-Funktion (Excel 365), um mehrere Teile eines Textstrings zusammenzufügen.Split-Befehl, um flexibler zu sein.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.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen