Font.ThemeFont (Excel)
Retorna ou define a fonte do tema no esquema de fontes aplicado associado ao objeto especificado. Leitura/gravação XlThemeFont. Os valores de retorno possíveis são xlThemeFontMajor - Grave, xlThemeFontMinor - Mínima, xlThemeFontNone - Não usar qualquer fonte de tema.
ActiveCell.Font.ThemeFont = xlThemeFontMajor