Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 18:21:56
Prüfen, ob Bild geladen wurde
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
19.10.2025 10:48:58
Zufällige Uhrzeit
19.10.2025 10:46:18
Zufallszahlen nur wenn Datum ab kommenden Sonntag
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1148to1152
1148to1152
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Split mit Wildcard

Forumthread: Split mit Wildcard

Split mit Wildcard
Gerd
Hallo,
kann man bei einem Splitbefehl auch Wildcards benutzen?
Mit Split(Text;"AB 1") trenne ich im Moment meinen Text in die passenden Stücke.
Leider kann der Trenner statt "AB1" aber auch mal "AB 9" oder "AB 15" sein.
Kann ich das irgendwie mit einem Splitbefehl abfangen? Split (Text;"AB *") geht leider nicht.
Danke!
Gerd
Anzeige

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

Betreff
Benutzer
Anzeige
Sowas kann nicht funktionieren!
25.03.2010 12:52:30
Renee
Gerd,
Das Trennkenzeichen muss eindeutig sein. Ein Wildcard macht auch keinen Sinn, weil dann ja nach dem AB x-beliebiges folgen könnte, also auch der eigentliche zu extrahierende Wert.
Bleibt nur auf "AB " zu splitten und dann jeden Eintrag ggf. nochmals aufzutrennen. Aber vielleicht kannst ja mal einige Beispiele von solchen Daten hier reinstellen!
GreetZ Renée
Anzeige
habe eine Lösung
25.03.2010 14:22:14
Gerd
Hallo Renée,
ich mache es jetzt so: split(split(Text,"AB");" ") (2)
Damit bekomme ich den Wert nach der Zahl und das ist, was ich brauche.
Gerd
Was zufällig nur den 1 Wert zurückgibt! (owt)
25.03.2010 14:44:03
Renee

AW: Split mit Replace
25.03.2010 15:16:13
Gerd
Hallo Namensvetter!
strText = "#### AB 99 #####"
strText= Replace(strText, "AB ", "AB")
strText= Split(strText,"AB") (2)
strText= Mid(strText, 1+ Len(Val(strText)))
Gruß Gerd
Anzeige
Nein, aber man kann den Delimiter dynamisch...
25.03.2010 19:34:41
Luc:-?
…gestalten, Gerd… 
Const defTrZ As String = "AB ", eleWahl As Long = 1
Dim Text As String, TextErg As String, aktTrZ As String, _
TrZpos As Long, p As Long, TextVar As Variant
TrZpos = Instr(Text, defTrZ)
If CBool(TrZpos) Then
p = TrZpos + Len(defTrZ): aktTrZ = defTrZ
While IsNumeric(Mid(Text, p, 1))
aktTrZ = aktTrZ & Mid(Text, p, 1): p = p + 1
Wend
TextVar = Split(Text, aktTrZ)
TextErg = TextVar(LBound(TextVar) + eleWahl)
Else: TextErg = Text
End If
'...
Gruß Luc :-?
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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