excel - PowerPoint VBA 更改图表中所选项目的字体颜色

Question

我知道这听起来很简单，但我还没有在网络和本网站上找到任何解决方案。

所以，我在 Excel 中有一个宏，可以更改任何选定项目(范围、图表、文本框等)的字体颜色，代码非常简单:

Selection.Font.Color = RGB(0,0,0)

但在 PowerPoint 中，Excel 中没有“选择”通配符这样的东西。在 PowerPoint 中，这适用于文本框 --

ActiveWindow.Selection.TextRange.Font.Color = RGB(0,0,0)

但它不适用于图表和表格。因此，对于图表，我使用此代码 --

ActiveWindow.Selection.ShapeRange(1).Chart.ChartArea.Format.TextFrame2.TextRange.Font.Fill.ForeColor.RGB RGB(0,0,0)

问题是它更改了图表中的所有文本——标题、标签、轴等。而我只需要更改所选项目的字体颜色。例如，仅标题或仅标签，具体取决于用户决定选择的内容。

我不知道如何区分图表中选择的项目，以便仅将更改应用于它。例如——

.ChartTitle.Format.Fill.ForeColor.RGB, etc.

有没有办法确定选择了什么项目？还是仅将更改应用于它？谢谢。

Answer 1

很遗憾，您的问题的简单答案是否定的。 PPT 对象模型无法返回图表中的选定项。

不过，John Korchok 的建议应该允许您向用户提供所需的颜色以供选择。