Powerpoint/Excel VBA：是否仍可以通过编程方式更改为本机下拉列表（如表格边框笔颜色/重量）显示的选择？

我想知道是否有一种方法可以通过编程方式使用VBA更改本机PowerPoint/Excel下拉列表中显示的选择值，例如，绘制表格笔的颜色、样式等。我的意思见下图：

我知道如何直接设置所选表格单元格的边框颜色等，但希望能够以编程方式以用户可见的方式保留该设置。因此，一旦运行宏，将绘图表笔颜色更改为蓝色，笔重更改为3pt，用户将看到下拉列表变为蓝色，笔重设置为3pt，并且他/她在宏之外进行的任何后续绘图都将以3pt的重量显示为蓝色，因为ppt/excel保留了此设置

也许有一种方法可以通过命令栏实现这一点？例如，我知道您可以通过以下方式以编程方式模拟本机commandbar按钮的执行：

PowerPoint.CommandBars.ExecuteMso ("PasteSourceFormatting")

有人知道这是否可能吗？我猜答案是否定的，但如果有任何提示，我将不胜感激

谢谢

---

编辑：公平地说，最相关的实用程序可能仅限于“绘制边框”下拉列表，而不是字体/数字设置下拉列表。我将这些内容与其他下拉列表示例一样包括在内，但我想我所问的问题并不适用于它们。

例如，在Excel中，当您通过代码将单元格A1的字体更改为Arial，并且选中该单元格时，命令栏中的字体将显示为Arial，因此我无法理解您为什么要直接操作命令栏。您肯定是对的，我通过编辑修改了我的帖子，并意识到这仍然令人困惑。但是，您看到直接操作命令栏来绘制表格的目的了吗？这里的要点是，理想情况下，您可以直接设置画笔的颜色/重量/样式，然后调用原生mso函数（如所有边框或外部边框），而无需编写更复杂的代码从头开始重新创建绘制边框函数。