VBA在不同选项卡上绘制多个命名范围

Question

我有一个图表，通过分配给开发者按钮的VBA宏进行更新：

ActiveChart.SetSourceData Source:=Sheets("Tab1").Range("Range1")

VBA引用一个命名范围（Range1），该范围使用OFFSET逻辑以浮动方式引用所需的数据范围。

=OFFSET('data sheet'!$A$6,0,0, COUNTIF('data sheet'!$A$7:$A$506,">1")+1,COUNTIF('data sheet'!$A$3:$GT$3,"*"))

我现在需要在此图表中添加更多系列，并希望将Range 2添加到我的图表中，但发现将我的VBA修改为以下内容无效：

ActiveChart.SetSourceData Source:=Union(Sheets("Tab1").Range("Range1"),Sheets("Tab2").Range("Range2"))

ps，我没有在这里包含一个示例数据集，因为所有部分都使用动态命名范围，所以只要变量以列形式存储，构建在任何nXn数据网格上的解决方案就可以在这里工作

Answer 1

ActiveChart.SeriesCollection.Add [Range2]

Answer 2

你可以试试这个：

ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(2).Name = "=" & [my_range].Name

而不是工会。 在你的情况下，[my_range]应该是Range2。