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

Utilize Entradas de Texto Automático (índice), em que o índice é o nome da entrada de Texto Automático ou número de índice, para devolver 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.