AW: Text in Worddocument suchen
xr8k2
Hallo Thomas,
sorry, deine Version hab ich überlesen. Ich arbeite mit Office2003 und da funktionierts.
Das .Find Object mit .Execute gab´s aber auch schon in Office97 glaub ich.
Versuch zur Not evtl. mal so hier:
Sub WordFinder()
With GetObject(, "Word.Application").Activedocument.Range.Find
If .Execute(findtext:=Range("A1")) Then MsgBox "Text gefunden!"
End With
End Sub
Wenn´s nicht funzt, musst du halt mal in die VBA-Hilfe von WORD nach der korrekten Syntax untersuchen. Ich kanns leider nicht testen.
Gruß,
xr8k2