Example

The following example sets a ThemeFonts object to a minor theme font.

Visual Basic for Applications
Dim tTheme As OfficeTheme Dim tfThemeFonts As ThemeFonts Set tfThemeFonts = tTheme.ThemeFontScheme.MinorFont 

See also: