Workbook.ApplyTheme (Excel)

Wendet das angegebene Design auf die aktuelle Arbeitsmappe an.

ApplyTheme (Filename)

Filename: Name des Designs.

Dim strFilename As String: strFilename = 
ActiveWorkbook.ApplyTheme Filename:=strFilename