如何在PowerPoint中加载XML配色方案文件？

PowerPoint VBA中加载自定义XML配色方案的对象层级和Word略有不同，对应的核心代码如下：

' 替换为你的XML配色方案完整路径
ActivePresentation.TemplateTheme.ThemeColorScheme.Load "C:\CustomThemes\MyColorScheme.xml"

关键说明 #

• 和Word的ActiveDocument.DocumentTheme对应，PowerPoint使用ActivePresentation.TemplateTheme来访问演示文稿的主题对象
• ThemeColorScheme.Load方法的参数要求完全一致：传入配色方案XML文件的完整本地路径（包含文件名和.xml扩展名）
• 执行代码后，自定义配色方案会直接覆盖当前演示文稿的主题配色，所有依赖该主题的幻灯片样式会自动更新

扩展示例（加载到新演示文稿） #

如果需要给新建的演示文稿加载配色方案，可以用这段代码：

Dim newPres As Presentation
Set newPres = Presentations.Add
newPres.TemplateTheme.ThemeColorScheme.Load "C:\CustomThemes\MyColorScheme.xml"

内容的提问来源于stack exchange，提问作者Miguel de las Nieves