Объект ThemeFont (Office)
Представляет контейнер для схем шрифтов темы Microsoft Office.
В следующем примере для схемы шрифтов Заголовки в теме Microsoft Office задается латинская схема.
Dim tTheme As OfficeTheme
Dim tfThemeFontScheme As ThemeFontScheme
Dim tfThemeFont As ThemeFont
Set tfThemeFontScheme = tTheme.ThemeFontScheme
Set tfThemeFont = tfThemeFontScheme.MajorFont(msoThemeLatin)
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.