Word 2010: Display selected Theme or Theme Colors

Topic

New Reply

Hi, everyone. Short of opening the menu for Themes (on the page layout ribbon) and looking through the list to see which theme has been applied, is there a task pane or dialog that will state the currently-applied Theme, Theme Colors, Theme Fonts, and Theme Effects? I’ve tried the Style Inspector, but that only lists attributes applied to individual formatting selections, such as font, paragraphs, etc.

Thanks for any help!

~Val in breezy IL

Reply | Quote

Replies

I don’t think there is a single dialog to show you this information.

You could try running a macro to query the current values. This macro puts the relevant information into the immediate window of the VBA editor.

Code:

Sub temp1()  With ActiveDocument.DocumentTheme
    Debug.Print “Major Font: ” & .ThemeFontScheme.MajorFont(msoThemeLatin)
    Debug.Print “Minor Font: ” & .ThemeFontScheme.MinorFont(msoThemeLatin)


    Debug.Print “Dark 1: ” & .ThemeColorScheme(msoThemeDark1).RGB
    Debug.Print “Dark 2: ” & .ThemeColorScheme(msoThemeDark2).RGB
    Debug.Print “Light 1: ” & .ThemeColorScheme(msoThemeLight1).RGB
    Debug.Print “Light 2: ” & .ThemeColorScheme(msoThemeLight2).RGB
    Debug.Print “Hyperlink: ” & .ThemeColorScheme(msoThemeHyperlink).RGB
    Debug.Print “Followed Hyperlink: ” & .ThemeColorScheme(msoThemeFollowedHyperlink).RGB
    Debug.Print “Accent 1: ” & .ThemeColorScheme(msoThemeAccent1).RGB
    ‘etc
  End With
End Sub

Reply | Quote

Hi, Andrew. That’s pretty cool code, and it works great. Thanks! I was hopeful the color names (and theme numbers) would display, but not enough to have you spend any more time writing code. I appreciate your willingness to offer this solution.

Reply | Quote

I am replying to my own post in hopes it may help someone else. I found the rather simple answer – just point to the Theme icon on the Page Layout ribbon, and wait for the Tool Tip. When it displays, it reveals the theme in use. Ditto for colors, fonts & effects.

Reply | Quote