在 Microsoft Office 中预填充调色板颜色？

Question

我的同事在他们的 Excel 和 PowerPoint 文档中使用了非常特殊的颜色，他们来找我希望实现一些自动化。他们经常不得不为每个新文档完成从颜色 selector 中重新挑选相同的三种颜色的烦人任务。

他们必须 select RGB 值，然后将它们添加到每个文档的 "Recent Colors" 调色板中。

我知道有颜色主题，但他们只想运行一个 VBA 脚本或轻松保留通用设置以始终预加载这三种颜色。

问题

是否有一种快速方法 (VBA/feature) 可以保留通用设置（最近的颜色）以始终预加载这三种颜色？

Answer 1

在 PowerPoint 中，您可以执行此操作...不过我在 Excel OM 中没有看到 ExtraColors 对象。也许有类似的东西？

Sub AddExtraColors()

    With ActivePresentation.ExtraColors
        .Add RGB(111, 111, 111)
        .Add RGB(222, 222, 222)
        .Add RGB(50, 50, 50)
        ' etc
    End With

End Sub

如果找不到更直接的方法，您可以随时添加一个形状，将其填充设置为您想要的每种额外颜色，一个接一个，然后删除形状。使用过的颜色将保留在调色板的额外颜色部分。

Answer 2

我的同事找到了一个很好的解决方案，可以完美地满足我们的需求，尽管它确实涉及使用颜色主题，所以我有点超出了我的问题范围。

您可以导出具有所需颜色的主题，获取主题的 XML %USERPROFILE%\AppData\Roaming\Microsoft\Templates\Document Themes\Theme 颜色

然后将其分发到同一文件夹供其他人使用。

每个 Office 应用程序都可以通过两次单击获得该颜色主题。而这个复制过程可以用一个简单的BAT文件来完成。

在 Microsoft Office 中预填充调色板颜色？

Pre-populate palette colors in Microsoft Office?

excel

powerpoint

vba

ms-office

office-interop

问题