Método Find.ClearFormatting (Word)

Remove a formatação de parágrafo e texto do texto especificado em uma operação de localizar ou subistituir.

Sintaxe

expressão. Clearformatting

Expressão Uma variável que representa um objeto 'Find'.

Exemplo

Este exemplo remove a formatação do critério de localização antes de pesquisar pela seleção. Se a palavra "Hello" com formatação de negrito for localizada, todo o parágrafo será selecionado e copiado para a Área de transferência.

Sub ClrFmtgFind() 
 With Selection.Find 
 .ClearFormatting 
 .Font.Bold = True 
 .Execute FindText:="Hello", Format:=True, Forward:=True 
 If .Found = True Then 
 .Parent.Expand Unit:=wdParagraph 
 .Parent.Copy 
 End If 
 End With 
End Sub

Confira também

Objeto Find

Suporte e comentários

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.