vba - Excel VBA在图表选项卡上更改表单控件的属性

Question

我在我的图表选项卡上添加了一个标签，但是当我尝试更改它的字体时，所有字段都是灰色的。我已经进行了足够的搜索，但没有找到任何解决方案。我附上了我的图表选项卡的屏幕截图。

我想在图表选项卡上更改此标签 10 的字体属性。有没有办法可以通过 VBA 访问属性。

要更改文本，我录制了一个宏。

ActiveChart.Shapes("Label 10").Select
Selection.Characters.Text = "Mohit"
ActiveChart.ChartArea.Select

我尝试了行代码:

 Selection.TextFrame.Characters.Font.Size = 20

但它不起作用。有没有办法改变这个标签的颜色和字体大小？

我现在使用的备用

现在我使用矩形而不是标签。我想要实现的是显示所选按钮的名称( PV 、 Terrorism 或 SRCC )，以表明该按钮已被选中。所以我点击了 PV，我的系列发生了变化，Rectangle 显示了所选 Peril 的名称。


现在，如果我再次选择 SRCC，就会发生同样的事情。


对于代码，我只需在每次按下按钮时更改矩形的文本，因为我预设了一次保持相同的文本的字体和大小。我无法使用标签更改文本的字体和大小。

Answer 1

ActiveChart.Shapes("Label 10").Select
With Selection
    .Characters.Text = "Mohit"
    .Font.Size = 20
End With

或者你可以避免 Select/ Selection访问您的 Chart对象名称:

With Charts("ChartName").Shapes("Label 10").TextFrame2.TextRange
    .Text = "Mohit"
    .Font.Size = 20
End With