Hallo!

Ich sitze hier gerade an einem VBA-Problem (Word97):
Ich suche einen Text, der durch einen regulären Ausdruck ermittelt wird. Aber irgendwie markiert Word den bei einem Fund nicht, sondern lässt den Cursor, wo er ist.

Wäre er markiert, könnte ich ihn mit

Selection.Text

auslesen, aber so?

Hier ist mal ein wenig Code:

If ActiveDocument.Bookmarks.Exists("marke") Then
        start_bereich = ActiveDocument.Bookmarks("marke").Start
        ende_bereich = ActiveDocument.Bookmarks("marke").End
        Set meinbereich = ActiveDocument.Range(Start:=start_bereich, End:=ende_bereich)
        
        With meinbereich.Find
            .Text = "^z*[!^t]^t"
            .Execute MatchWildcards:=True, Forward:=True
        End With
        
        Selection.Find.Execute
        
        While massbereich.Find.Found
            ' mach Kram
        Wend
End If

Da, wo "mach Kram" steht, brauche ich den gefundenen Text. Hat jemand eine Ahnung, wie ich an den rankommen kann?

mfg bored