VBA - Teil aus String entfernen

[Klaus]

Guten Morgen miteinander.

Wie kann man aus einer Spalte, aus einem String, nur die Zahl die hinter einem bestimmten Zeichen steht kopieren und in eine andere Spalte übergeben?


Ziel: 
der Text steht in A:A
der Text soll nach H:H
das Wort "P1" ist das Schlüsselwort. 
Nur die Zahl hinter "P1" soll in die anderen Spalte übergeben werden. 
Hinter der Zahl nach P1 kommt immer ein "|M"

Bsp Text:
"das ist ein P1=130|M1255...und hier steht 5587noch mehr251d"


Die Zahl hinter "P1=" kann ein bis vierstellig sein.
Der Text vor "P1" ist verschieden lang.

Ist sowas machbar?

Liebe Grüße
Klaus

[Case]

Hallo,

eventuell so:

  UDF_String_Zahl_auslesen_zwei_Stellen.xlsb (Größe: 13,87 KB / Downloads: 3)

[Klaus]

Herzlichen Dank Case,

es funktioniert fast perfekt.
Wie ich sehe, hast du das am "=" festgemacht.
Ich hätte erwähnen sollen, dass auch sowas "|-| 1 = {{" vorn weg stehen kann.
Sorry 

Gibt es hier auch eine Lösung?

[Case]

Hallo Klaus,

dann so:

  UDF_String_Zahl_auslesen_zwei_Stellen_1.xlsb (Größe: 14,04 KB / Downloads: 4)

[Klaus]

Vielen Dank Case,

ich komme erst nachher dazu das zu testen.
Ich gebe dann aber auf jeden Fall noch eine Rückmeldung.

bis dahin
Klaus

[Klaus]

Hallo Case,

ich kann mir jetzt zwar keinen Reim mehr auf den Code machen, aber ich werde das schon raus bekommen. 
Auf jeden Fall funktioniert es fantastisch.

Vielen herzlichen Dank