|
Dein Problem ist für mich nicht nachvollziehbar.
Ich hoffe du hast die zwei hervorgehoben Zeilen im Code bei dir entsprechend ersetzt.
ABC0012_____h_Infotext mit unterschiedlicher Länge
ABC1234__A__B_Text
Beschreibung oben = h
Beschreibung unten = B
Beide haben die Stelle 13 von links
Welche Stelle kümmert den Code nicht; das funktioniert anders
-> was zum Lesen: Reguläre Ausdrücke in VBA [www.vba-tutorial.de]
Der Ausdruck ([^\\_]+?(\d+))_+([^\\_]+)_+([^\\_]+)_+(.+) angewandt auf die Zeichenkette "ABC1234__A__B_Text" mapped das ABC1234 als Submatch(0) sowie 1234 als Submatch(1)und B als SubMatch(3) usw.
Sollte das weiterhin nicht funktionieren, dann ist deine Beschreibung fehlerhaft/ungenau.
|