图表选项卡上的Excel VBA更改窗体控件的属性

我在“图表”选项卡上添加了一个标签,但是当我尝试更改它的字体时,所有字段都变灰了。 我已经足够的search,但没有find任何解决scheme。 我附上我的图表选项卡的屏幕截图。 在这里输入图像描述

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

要改变文本,我录制了一个macros。

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

我试过了行代码:

  Selection.TextFrame.Characters.Font.Size = 20 

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

替代,我现在正在使用

现在我正在使用矩形而不是标签。 我想达到的目的是显示所选button的名称(PV,恐怖主义或SRCC),作为这个button被选中的指示。 所以我点击PV,我的系列改变了,Rectangle显示了select的危险的名字。 在这里输入图像描述

现在,如果我再次selectSRCC,则会发生同样的情况。 在这里输入图像描述

对于代码,我只需要每次按下一个button就改变矩形的文本,因为我预设的文本的字体和大小保持不变。 我无法通过标签更改文字的字体和大小。

 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