OLE WORD gefunden Text auslesen.

OLE WORD gefunden Text auslesen.

Aufgabe: Suche einen Text mit WildCard in einem vorhanden Word-Dokument z.B. "$$NAME$$". (Suche $$*$$)
Wenn gefunden, dann möchte ich diesen Text lesen.
Finden und auswählen funktioniert, aber leider komme ich beim Auslesen des Textes nicht weiter.
Hier der Code:

*############
INCLUDE ole2incl.

DATA: strfelder TYPE string.
DATA: h_word TYPE ole2_object.

CREATE OBJECT h_word 'Word.Basic'.

CALL METHOD OF
h_word
'FileOpen'
EXPORTING
#1 = 'c:\A\Test.doc'.
CALL METHOD OF
h_word
'AppShow'.


CALL METHOD OF
h_word
'EditFind'

EXPORTING
#01 = '$$*$$'
#02 = ''
#03 = 0
#04 = 1
#05 = 0
#06 = 1
#07 = 0
#08 = 0
#09 = 0.
* #10 = 1.
* #11 = 1
* #12 = 1.

CALL METHOD OF
h_word
'TEXT'

IMPORTING
#1 = strfelder.

WRITE: 'Gesuchter Text: ', strfelder

*############

Kann mir bitte jemand weiterhelfen. Suche schon länger danach.
Dank
Gruß
Rolf