Edit

Application.SetDefaultTheme method (Word)

  • Article

Sets a default theme for Word to use with new documents, email messages, or webpages.

Syntax

expression.SetDefaultTheme (Name, DocumentType)

expression Required. A variable that represents an Application object.

Parameters

Name Required/Optional Data type Description
Name Required String The name of the theme you want to assign as the default theme plus any theme formatting options you want to apply. The format of this string is "themennn" where theme and nnn are defined in the Themes table.
DocumentType Required WdDocumentMedium The type of new document to which you are assigning a default theme.

Themes

String Description
theme The name of the folder that contains the data for the requested theme. (The default location for theme data folders is C:\Program Files\Common Files\Microsoft Shared\Themes.) You must use the folder name for the theme rather than the display name that appears in the Theme dialog box (Theme command, Format menu).
nnn A three-digit string that indicates which theme formatting options to activate (1 to activate, 0 to deactivate). The digits correspond to the Vivid Colors, Active Graphics, and Background Image check boxes in the Theme dialog box (Theme command, Format menu). If this string is omitted, the default value for nnn is "011" (Active Graphics and Background Image are activated).

Remarks

Setting a default theme will not apply that theme to the blank document automatically created when you start Word. Any new documents you create after that will have the default theme.

You can also use the ThemeName property to return and set the default theme for new email messages.

Example

This example specifies that Word use the Blueprint theme for all new email messages.

Application.SetDefaultTheme "blueprnt", wdEmailMessage

This example specifies that Word use the Expedition theme with Active Graphics for all new webpages.

Application.SetDefaultTheme "expeditn 010", wdWebPage

See also

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.