Hallo Forumsgemeinde,
ich verzweifle an einem Problem, welches ich in VBA nicht gelöst bekomme:
Ich möchte aus einem Textfeld ein Aktenzeichen auslesen.
Das Aktenzeichen hat immer das Format ##.##.## und kommt in dem zu prüfenden Textfeld immer an unterschiedlicher Position vor. Andere Zahlen können zusätzlich auch noch vorhanden sein.
Ob ein Aktenzeichen vorhanden ist, prüfe ich mit
If MeinText Like "*##.##.##*" Then ...
Das funktioniert gut.
Was nicht funktioniert ist die Bestimmung der Position mit
Aktenzeichen = InStr(1, MeinText, "##.##.##")
Das Format des Ergebnisses (Zahl oder String) wäre nicht so wichtig.
Hat jemand eine Idee dazu?
Grüße aus dem verregneten Rheinland und einen netten Abend noch.
Klaus