基于使用自定义名称选择的图表的Excel宏

Question

我已经找到了基于选择创建图表的宏

Sub Charter()
    Dim my_range    As Range

    Set my_range = Selection
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlColumnStacked
    ActiveChart.SetSourceData Source:=my_range
    Cells(1, 1).Select
End Sub

但无法弄清楚如何给它自定义名称（不是通用Chart <number>），以便我可以围绕它构建另一个宏。我找到了几种用名称创建图表的方法，但我无法弄清楚如何连接这两个宏。 任何想法该怎么做？

谢谢

Answer 1

您无法设置ActiveChart的Name属性。你必须去寻找它的父对象：

ActiveChart.Parent.Name = "Bananas"

Answer 2

我建议不要使用yourbutton.setenabled(false);，ActiveSheet，Selection和Select，而是使用完全限定的对象，例如下面的代码：

ActiveChart