View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
rick rick is offline
external usenet poster
 
Posts: 32
Default Activeworkbook.ApplyTheme()

Is there a way to override any User-chosen theme and apply a theme to a
workbook?

I have developed the workbook using the Office built-in theme. I am able to
apply any theme (other than Office) with:
<unprotect sheets
ActiveWorkbook.ApplyTheme ( _
"C:\Program Files\Microsoft Office\Document Themes 12\Aspect.thmx")
for example.

But, it looks like the Office theme is not available as it is not in the
Document Themes 12 library.

When I applied the Office theme, the command captured by the macro recorder
was ActiveWorkbook.ApplyTheme () however that gives a syntax error during
compile.

Any help would be appreciated.
Thanks.

Rick