Compartilhar via


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.