Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Tenta coincidir o texto do intervalo especificado ou o texto ao redor do intervalo com um nome de entrada de AutoTexto existente.
Sintaxe
expression. InsertAutoText
expression é obrigatório. Uma variável que representa um objeto Range.
Comentários
Se o Word localizar uma coincidência, InsertAutoText inserirá a entrada de AutoTexto para substituir esse texto. Se o Word não puder localizar uma coincidência, ocorrerá um erro.
Utilize o método Insert com um objeto AutoTextEntry para inserir uma entrada de Texto Automático específica.
Exemplo
Este exemplo insere uma entrada de AutoTexto que coincida com o texto ao redor de uma seleção.
Documents.Add
Selection.TypeText "Best w"
Selection.Range.InsertAutoText
Este exemplo insere uma entrada de AutoTexto com um nome que coincida com a primeira palavra do documento ativo.
Documents.Add
Selection.TypeText "In "
Set myRange = ActiveDocument.Words(1)
myRange.InsertAutoText
Confira também
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.