Propriedade FindReplace.FindText (Publisher)

Define ou recupera a cadeia de caracteres representando o texto a ser localizado na seleção ou intervalo especificado. Leitura/gravação.

Sintaxe

mais simples. FindText

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

Valor de retorno

Cadeia de caracteres

Comentários

A propriedade FindText retorna o texto não formatado, simples da seleção. Quando você define essa propriedade, o texto de pesquisa é especificado. Você pode procurar caracteres especiais especificando códigos de caracteres apropriados. Por exemplo, ^p corresponde a uma marca de parágrafo e ^t corresponde a um caractere de tabulação.

O valor padrão para a propriedade FindText é uma sequência vazia. Como há suporte apenas para a pesquisa de texto, FindText deve ser definido explicitamente para evitar um erro em tempo de execução.

Exemplo

Este exemplo substitui todas as ocorrências da palavra This na seleção pela palavra That em cada publicação aberta.

Dim objDocument As Document 
 
For Each objDocument In Documents 
 With objDocument.Find 
 .Clear 
 .MatchCase = True 
 .FindText = "This" 
 .ReplaceWithText = "That" 
 .ReplaceScope = pbReplaceScopeAll 
 .Forward = True 
 .Execute 
 End With 
Next objDocument 

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.