Selection.Find (Word)

Devuelve un objeto Find que contiene los criterios para una operación de búsqueda.

Si la operación de búsqueda se realiza correctamente, la selección se cambia.

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