UseThemeStyle Property Example
This example sets Microsoft Word to use the Artsy theme as the default theme for new e-mail messages and to use the character style defined in the Artsy theme.
Application.EmailOptions.ThemeName = "artsy"
Application.EmailOptions.UseThemeStyle = True