Find.Wrap (Word)

Retorna ou define o que acontece se a pesquisa começa em um ponto que não o início do documento e o final do documento é alcançado ou vice-versa se Forward for definido como false ou se o texto de pesquisa não for encontrado na seleção ou no intervalo especificado. Leitura/gravação WdFindWrap. Os valores de retorno possíveis são wdFindAsk - Depois de pesquisar a seleção ou o intervalo, o Microsoft Word exibe uma mensagem perguntando se deve pesquisar o restante do documento, wdFindContinue - A operação de pesquisa continua se o início ou o fim da região de pesquisa for atingido, wdFindStop - A operação de pesquisa é encerrada se o início ou o fim da região de pesquisa for atingido.

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