Объект 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 и обратная связь.