Seltsames Problem mit InStr
02.09.2008 22:25:57
Markus
da mir nun langsam die Ideen ausgehen, bitte ich um Hilfe, was an meinem Code falsch ist:
In einem längeren Textstring (txt) taucht folgende Teilsequenz auf: Munich, Mar 18, 2004. Der Pointer p1 selektiert das zweite Komma (Makro sucht vorher nach dem Jahr). Von diesem Komma aus versuche ich nun die beiden Leerzeichen davor zu identifizeren. p2 soll auf das vor der 18 zeigen, p3 auf das vor Mar. Sinn und Zweck der Übung ist die Monatsbezeichnung zu extrahieren, welche in ihrer Länge stark variieren kann (d.h. 3-stellige oder ausgeschriebene Monatsbezeichnungen sind möglich).
Die Teilsequenz hier zeigt mir mit p2 jedoch fälschlicherweise stets das an, was p3 anzeigen soll, d.h. das Leerzeichen vor Mar. Das vor der 18 wird stets ignoriert?!?!
x = 0
Do
x = x + 1
lv21 = InStr(p1 - x, txt, " ")
If lv21
Danke und viele Grüße,
Markus