ThemeFont object (Office)
Represents a container for the font schemes of a Microsoft Office theme.
The following example sets the Headings font scheme in a Microsoft Office theme to a Latin scheme.
Dim tTheme As OfficeTheme
Dim tfThemeFontScheme As ThemeFontScheme
Dim tfThemeFont As ThemeFont
Set tfThemeFontScheme = tTheme.ThemeFontScheme
Set tfThemeFont = tfThemeFontScheme.MajorFont(msoThemeLatin)
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.