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
expressão. 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 guia.
O valor padrão para a propriedade FindText é uma sequência vazia. Como há suporte apenas para pesquisa de texto, o FindText deve ser definido explicitamente para evitar um erro em tempo de execução.
Exemplo
Este exemplo substitui todas as ocorrências da palavra Isso na seleção pela palavra Que 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.