Localizar objeto (Word)
Representa o critério para uma operação de localização.
As propriedades e métodos do objeto Find correspondem às opções da caixa de diálogo Localizar e substituir.
Use a propriedade Find para retornar um objeto Find. O exemplo seguinte localiza e seleciona a próxima ocorrência da palavra "hi".
With Selection.Find
.ClearFormatting
.Text = "hi"
.Execute Forward:=True
End With
O exemplo seguinte localiza todas as ocorrências da palavra "hi" no documento ativo e substitui a palavra por "hello".
Set myRange = ActiveDocument.Content
myRange.Find.Execute FindText:="hi", ReplaceWith:="hello", _
Replace:=wdReplaceAll
Se você tiver chegado ao objeto Find a partir do objeto Selection, a seleção será alterada quando o texto coincidente com o critério de localização for encontrado. O exemplo seguinte seleciona a próxima ocorrência da palavra "blue".
Selection.Find.Execute FindText:="blue", Forward:=True
Se você tiver chegado ao objeto Find a partir do objeto Range, a seleção não será alterada quando o texto coincidente com o critério de localização for encontrado, mas o objeto Range será redefinido. O exemplo seguinte localiza a primeira ocorrência da palavra "blue" no documento ativo. Se "blue" for localizado no documento, myRange será redefinido e será aplicada a formatação com negrito a "blue".
Set myRange = ActiveDocument.Content
myRange.Find.Execute FindText:="blue", Forward:=True
If myRange.Find.Found = True Then myRange.Bold = True
Referência do modelo de objeto do Word
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.