Application.SetDefaultTheme method (Word)
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.