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