Объект Templates (Word)
Коллекция объектов Template , представляющих все доступные шаблоны. Эта коллекция включает открытые шаблоны, шаблоны, прикрепленные к открытым документам, и глобальные шаблоны, загруженные в диалоговом окне Шаблоны и надстройки .
Используйте свойство Templates , чтобы вернуть коллекцию Templates . В следующем примере отображаются путь и имя файла для каждого шаблона в коллекции Templates .
For Each aTemp In Templates
MsgBox aTemp.FullName
Next aTemp
Метод Add недоступен для коллекции Templates . Вместо этого можно добавить шаблон в коллекцию Templates , выполнив одно из следующих действий:
Использование метода Open с коллекцией Documents для открытия документа на основе шаблона или шаблона
Использование метода Add с коллекцией Documents для открытия нового документа на основе шаблона
Использование метода Add с коллекцией Addins для загрузки глобального шаблона
Использование свойства AttachedTemplate с объектом Document для присоединения шаблона к документу
Используйте шаблоны (индекс), где Index — это имя шаблона или номер индекса, чтобы вернуть один объект Template . В следующем примере сохраняется шаблон Dot1.dot.
Templates("C:\MSOffice\WinWord\Templates\Dot1.dot").Save
Номер индекса представляет позицию шаблона в коллекции Templates . В следующем примере отображается имя файла первого шаблона в коллекции Templates .
MsgBox Templates(1).FullName
Используйте свойство NormalTemplate , чтобы вернуть объект шаблона, ссылающийся на шаблон Normal. Используйте свойство AttachedTemplate , чтобы вернуть шаблон, присоединенный к указанному документу.
Используйте свойство DefaultFilePath , чтобы определить расположение шаблонов пользователей или рабочих групп (то есть папку, в которой эти шаблоны будут храниться). В следующем примере отображается папка пользовательского шаблона на вкладке Расположение файлов в диалоговом окне Параметры .
MsgBox Options.DefaultFilePath(wdUserTemplatePath)
Справочник по объектной модели Word
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.