Edit

Share via


ThemeFont object (Office)

Represents a container for the font schemes of a Microsoft Office theme.

Example

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) 

See also

Support and feedback

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.