Selection.Find (Word)

Gibt ein Find -Objekt zurück, das die Kriterien für einen Suchvorgang enthält.

Wenn die Suche erfolgreich ist, wird die Markierung geändert.

With Selection.Find 
 .Forward = True 
 .ClearFormatting 
 .MatchWholeWord = True 
 .MatchCase = False 
 .Wrap = wdFindContinue 
 .Execute FindText:="Microsoft" 
End With