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

时间：2016-08-20 11:52:20

标签： excel vba excel-vba

我在“图表”标签上添加了一个标签，但是当我尝试更改它的字体时，所有字段都显示为灰色。我已经搜索了足够但没有找到任何解决方案。我附上了我的图表标签的屏幕截图。enter image description here

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

要更改我录制宏的文字。

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

我尝试了行代码：

 Selection.TextFrame.Characters.Font.Size = 20

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

替代我现在正在使用

现在我使用的是Rectangle形状而不是Label。我想要实现的是显示所选按钮的名称（PV，恐怖主义或SRCC），作为已选择此按钮的指示。所以我点击PV并更改了我的系列，Rectangle显示了所选Peril的名称。 enter image description here

现在，如果我再次选择SRCC，则会发生同样的事情。 enter image description here

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

1 个答案:

答案 0 :(得分：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
相关问题
最新问题