|
Guten Tag,
ich übe mich in Regulären Ausdrücken ein, und versuche folgenden Code für meine Zwecke umzubauen:
Dim dieTreffer As Object
regEx.Pattern = "A.C"
regEx.Global = True
regEx.IgnoreCase = True
stringEins = "ABC-A1289C-ADC-A1289C-AJC"
Set dieTreffer = regEx.Execute(stringEins)
For Each dieTreffer In dieTreffer
Debug.Print dieTreffer.Value
'Next
Der obige Code funktioniert. Nur mein angepasster Code (unten) will nicht so richtig...
Und zwar möchte ich, alle Namen ausgegeben bekommen, die mit „H“ Anfangen und mit „a“ enden. Leider funktioniert das nicht so ganz, mein Code gibt folgendes aus:
a
a
Ha
a
a
Ha
a
a
Das verstehe ich nicht ganz. Irgendwo ist noch der Wurm im folgenden Code:
Dim dieTreffer As Object
regEx.Pattern = "H*a"
regEx.Global = True
regEx.IgnoreCase = True
stringEins = "Mario Karl Hanna Heidi Klaus Hara Dieter Helena"
Set dieTreffer = regEx.Execute(stringEins)
For Each dieTreffer In dieTreffer
Debug.Print dieTreffer.Value
Next
Für mich sieht der Reguläre Ausdruck eigentlich in Ordnung aus (was es aber anscheinend nicht ist). Würde mich sehr über Unterstützung freuen!
|