Workbook.Theme (Excel)

Gibt das auf die aktuelle Arbeitsmappe angewendete Design zurück.


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