ActiveThemeDisplayName Property Example
This example shows the display name of the active theme for the current document.
MsgBox ActiveDocument.ActiveThemeDisplayName