Método Replacement.ClearFormatting (Word)

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

Sintaxe

expressão. Clearformatting

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

Exemplo

Este exemplo limpa a formatação do critério de localização ou substituição antes de substituir a palavra "Inc." por "incorporated" ao longo do documento ativo.

Sub ClrFmtgReplace() 
 Dim rngTemp As Range 
 Set rngTemp = ActiveDocument.Content 
 With rngTemp.Find 
 .ClearFormatting 
 .Replacement.ClearFormatting 
 .MatchWholeWord = True 
 .Execute FindText:="Inc.", ReplaceWith:="incorporated", _ 
 Replace:=wdReplaceAll 
 End With 
End Sub

Confira também

Objeto Replacement

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.