✔ Bestimmten text herausfiltern

[tfBullet]

Hey leute habe ein kleines problem und zwar:

WortA = "wort1"
WortB = "wort2"
WortC = "wort3"
WortD = "wort4"


posA = InStr(1, Text, WortA)
posB = InStr(posA, Text, WortB)
ABText = Mid(Text, posA, posB - posA)

posC = InStr(posB, Text, WortC)
posD = InStr(posC, Text, WortD)
CDText = Mid(Text, posC, posD - posC)

Text2.Text = ABText & ";" & CDText

hiermit lasse ich aus einem text daten auslesen
die nacher in folgendem format angezeigt werden sollen ABtext;CDText
leider bekomme ich immer wort1 bzw. wort3 mit davor angezeigt... ich verstehe
einfach nicht warum... kann mir da vllt jemand helfen?

Danke im vorraus

mfg
tfBullet

 

[DrSoong]

Ist klar, du kriegst ja immer die Positionen raus, wo das gesuchte Wort beginnt. Das musst du beim Ausschneiden natürlich berücksichtigen:

WortA = "wort1"
WortB = "wort2"
WortC = "wort3"
WortD = "wort4"


posA = InStr(1, Text, WortA)
posB = InStr(posA, Text, WortB)
ABText = Mid(Text, posA + Len(WortA), posB - posA - Len(WortA))

posC = InStr(posB, Text, WortC)
posD = InStr(posC, Text, WortD)
CDText = Mid(Text, posC + Len(WortC), posD - posC - Len(WortC))

Text2.Text = ABText & ";" & CDText

Der Doc!