2010-11-02 107 views
0

我想使用VBA代码设置工作簿主题。Excel 2007 VBA ApplyTheme插件

ActiveWorkbook.ApplyTheme( “C:\用户\克里斯\应用程序数据\漫游\微软\模板\文档主题\ MyTheme.thmx”)

这工作,但我不知道如何创建一个路径“文档主题”文件夹,这将为所有用户工作?

感谢 克里斯

回答

0

您可以使用Environ功能得到用户的应用程序数据文件夹:

Dim themeFolder As String 
themeFolder = Environ("APPDATA") & "Microsoft\Templates\Document Themes"