Find.Wrap (Word)

Legt bei einer Suche, die nicht am Dokumentanfang begonnen wurde, die weitere Vorgehensweise nach Erreichen des Dokumentendes fest (oder umgekehrt, sofern Forwardauf False festgelegt ist), bzw. wenn der Suchtext nicht in der angegebenen Auswahl oder in dem Bereich gefunden wird, oder gibt Informationen darüber zurück. Mögliche Rückgabewerte sind wdFindAsk - Nachdem die Suche in der Auswahl oder dem Bereich durchgeführt wurde, wird in Microsoft Word eine Meldung angezeigt, in der Sie gefragt werden, ob die Suche für das restliche Dokument durchgeführt werden soll, wdFindContinue - Der Suchvorgang wird fortgesetzt, wenn der Anfang oder das Ende des Suchbereichs erreicht wird, wdFindStop - Der Suchvorgang wird beendet, wenn der Anfang oder das Ende des Suchbereichs erreicht wird.

Sub WordFind() 
 With Selection.Find 
 .Forward = True 
 .ClearFormatting 
 .MatchWholeWord = True 
 .MatchCase = False 
 .Wrap = wdFindContinue 
 .Execute FindText:="aspirin" 
 End With 
End Sub