Workbook.Theme (Excel)

Cette propriété renvoie le thème appliqué au classeur actif. En lecture seule.

Dim oteTheme As Office.OfficeTheme
Set oteTheme = ActiveWorkbook.Theme