Zeichen in String ermitteln!

[Jörg Lorenz]

Hi Stefan,

Hallo zusammen!

Ich arbeite mit VBA in Word...! jetzt möchte ich einen Teil von einem string auslesen und zwar:

....12345678#Test++45678910#HalliHallo

ich möchte die zahl 45678910 auslesen

Klar, man könnte von hinten eine Schleife darüber laufen lassen. Aber wenn die "++" auch ein Merkmal sind, geht es auch so:

strText = "12345678#Test++45678910#HalliHallo"
strText = Left(Right(strText, Len(strText) - InStr(1, strText, "++") - 1), _
        InStr(1, Right(strText, Len(strText) - InStr(1, strText, "++") - 1), "#") - 1)

Viele Grüße

Jörg