Propriedade FindReplace.MatchWidth (Publisher)

Define ou retorna um booliano que representa se uma operação de pesquisa corresponderá à largura do caractere do texto pesquisado. Leitura/gravação.

Sintaxe

expressão. MatchWidth

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

Valor de retorno

Booliano

Comentários

Essa propriedade pode não estar disponível, dependendo do idioma habilitado no seu sistema operacional. O valor padrão é False.

Retornará "Acesso negado" se uma linguagem do Leste Asiático não estiver habilitada.

Exemplo

O exemplo a seguir encontra cada ocorrência da palavra "largura" no documento ativo e aplica formatação em negrito. A propriedade MatchWidth é definida como False para que completo ou caracteres de meia largura sejam encontrados. Por exemplo, esta pesquisa aplicará formatação com negrito à palavra "width" (caracteres de meia largura) e a palavra "w i t d h" (caracteres de largura total).

Dim objDocument As Document 
Set objDocument = ActiveDocument 
With objDocument.Find 
 .Clear 
 .FindText = "width" 
 .MatchWidth = False 
 Do While .Execute = True 
 .FoundTextRange.Font.Bold = msoTrue 
 Loop 
End With

O exemplo a seguir encontra cada ocorrência da palavra "largura" no documento ativo e aplica formatação em negrito. A propriedade MatchWidth é definida como True para que serão encontrados completo ou caracteres de meia largura. Por exemplo, esta pesquisa aplicará formatação em negrito ao "largura". Ele não se aplica a formatação à palavra "w i t d h".

Dim objDocument As Document 
Set objDocument = ActiveDocument 
With objDocument.Find 
 .Clear 
 .FindText = "width" 
 .MatchWidth = True 
 Do While .Execute = True 
 .FoundTextRange.Font.Bold = msoTrue 
 Loop 
End With

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.