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.
Cria uma entrada de AutoCorreção formatada, preservando todos os atributos de texto do intervalo especificado. Retorna um objeto AutoCorrectEntry .
Sintaxe
expression. AddRichText( _Name_ , _Range_ )
expressão Obrigatório. Uma variável que representa uma coleção 'AutoCorrectEntries'.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Name | Obrigatório | String | O texto a ser automaticamente substituído por Range. |
| Range | Obrigatório | Range | O texto formatado que o Word irá inserir automaticamente sempre que Name for digitado. |
Valor de retorno
AutoCorreçãoEntry
Comentários
A propriedade RichText para entradas adicionadas pelo uso desse método retorna True. Quando AddRichText não é usado, as entradas de AutoCorreção inseridas seguem o estilo atual.
Exemplo
Este exemplo armazena o texto selecionado como uma entrada de AutoCorreção formatada que será inserida automaticamente sempre que "NewText" for digitado.
If Selection.Type = wdSelectionNormal Then
AutoCorrect.Entries.AddRichText "NewText", Selection.Range
Else
MsgBox "You need to select some text."
End If
Este exemplo armazena a terceira palavra no documento ativo como uma entrada de AutoCorreção formatada que será inserida automaticamente sempre que "NewText" for digitado.
AutoCorrect.Entries.AddRichText "NewText", ActiveDocument.Words(3)
Confira também
Objeto da coleção AutoCorrectEntries
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.