Objeto AutoTextEntry (Word)
Representa uma única entrada de AutoTexto. O objeto AutoTextEntry é um membro da coleção AutoTextEntries. A coleção AutoTextEntries contém todas as entradas de AutoTexto do modelo especificado. As entradas são listadas na guia AutoTexto da caixa de diálogo AutoCorreção.
Comentários
Use AutoTextEntries (index), em que o índice é o nome de entrada do AutoText ou o número de índice, para retornar um único objeto AutoTextEntry . Você deve coincidir exatamente a ortografia (mas não necessariamente as maiúsculas/minúsculas) do nome, como ele é mostrado na guia AutoTexto da caixa de diálogo AutoCorreção. O exemplo a seguir define o valor de uma entrada de AutoTexto existente chamada "cName".
NormalTemplate.AutoTextEntries("cName").Value = _
"The Johnson Company"
O exemplo a seguir exibe o nome e o valor da primeira entrada de AutoTexto do modelo anexado ao documento ativo.
Set myTemplate = ActiveDocument.AttachedTemplate
MsgBox "Name = " & myTemplate.AutoTextEntries(1).Name & vbCr _
& "Value " & myTemplate.AutoTextEntries(1).Value
O exemplo a seguir insere a entrada de AutoTexto global chamada "TheWorld" no ponto de inserção.
Selection.Collapse Direction:=wdCollapseEnd
NormalTemplate.AutoTextEntries("TheWorld").Insert _
Where:=Selection.Range
Use o método Add para adicionar um objeto AutoTextEntry à coleção AutoTextEntries. O exemplo a seguir adiciona uma entrada de AutoTexto chamada "Blue" baseada no texto da seleção.
NormalTemplate.AutoTextEntries.Add Name:="Blue", _
Range:=Selection.Range
Métodos
Propriedades
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.