Поделиться через


Объект AutoTextEntry (Word)

Представляет одну запись автотекста. Объект AutoTextEntry является членом коллекции AutoTextEntries . Коллекция AutoTextEntries содержит все записи автотекста в указанном шаблоне. Записи отображаются на вкладке Автотекст в диалоговом окне Автозамена .

Замечания

Используйте AutoTextEntries (index), где index — это имя или номер индекса автотекста, чтобы вернуть один объект AutoTextEntry . Вы должны точно соответствовать написанию (но не обязательно прописной) имени, как показано на вкладке Автотекст в диалоговом окне Автозамена . В следующем примере задается значение существующей записи автотекста с именем "cName".

NormalTemplate.AutoTextEntries("cName").Value = _ 
 "The Johnson Company"

В следующем примере показано имя и значение первой записи автотекста в шаблоне, присоединенном к активному документу.

Set myTemplate = ActiveDocument.AttachedTemplate 
MsgBox "Name = " & myTemplate.AutoTextEntries(1).Name & vbCr _ 
 & "Value " & myTemplate.AutoTextEntries(1).Value

В следующем примере в точку вставки вставляется глобальная запись AutoText с именем TheWorld.

Selection.Collapse Direction:=wdCollapseEnd 
NormalTemplate.AutoTextEntries("TheWorld").Insert _ 
 Where:=Selection.Range

Используйте метод Add , чтобы добавить объект AutoTextEntry в коллекцию AutoTextEntries . В следующем примере добавляется запись автотекста с именем Blue на основе текста выделенного фрагмента.

NormalTemplate.AutoTextEntries.Add Name:="Blue", _ 
 Range:=Selection.Range

Методы

Свойства

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.