Метод Application.SetDefaultTheme (Word)
Задает тему по умолчанию для Word для использования с новыми документами, сообщениями электронной почты или веб-страницами.
Синтаксис
expression. SetDefaultTheme (Name, DocumentType)
выражение (обязательно). Переменная, представляющая объект Application .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Name | Обязательный | String | Имя темы, которую вы хотите назначить в качестве темы по умолчанию, а также любые параметры форматирования темы, которые вы хотите применить. Формат этой строки — themennn, где тема и nnn определены в таблице Темы . |
| DocumentType | Обязательный | WdDocumentMedium | Тип нового документа, которому назначается тема по умолчанию. |
Темы
| String | Description |
|---|---|
| theme | Имя папки, содержащей данные для запрошенной темы. (По умолчанию для папок данных темы используется C:\Program Files\Common Files\Microsoft Shared\Themes.) Необходимо использовать имя папки для темы, а не отображаемое имя, которое отображается в диалоговом окне Тема (команда Тема , меню Формат ). |
| Nnn | Строка из трех цифр, указывающая, какие параметры форматирования темы следует активировать (1 — активировать, 0 — деактивировать). Цифры соответствуют флажкам Яркие цвета, Активная графика и Фоновое изображение в диалоговом окне Тема (команда Тема , меню Формат ). Если эта строка опущена, значение по умолчанию для nnn — "011" (активируются активные графические элементы и фоновое изображение). |
Замечания
Установка темы по умолчанию не будет применяться к пустому документу, автоматически созданному при запуске Word. Все новые документы, создаваемые после этого, будут иметь тему по умолчанию.
Вы также можете использовать свойство ThemeName , чтобы вернуть и задать тему по умолчанию для новых сообщений электронной почты.
Пример
В этом примере указывается, что Word использует тему схемы для всех новых сообщений электронной почты.
Application.SetDefaultTheme "blueprnt", wdEmailMessage
В этом примере указано, что word использует тему Экспедиция с активной графикой для всех новых веб-страниц.
Application.SetDefaultTheme "expeditn 010", wdWebPage
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.