使用两张excel表格生成图形
我已经编写了使用两页数据生成图形的代码。使用两张excel表格生成图形,excel,vba,Excel,Vba,我已经编写了使用两页数据生成图形的代码。 代码是 ActiveChart.SeriesCollection.NewSeries ActiveChart.SeriesCollection(2).XValues = "=SPEC!$B$2:$J$2" ActiveChart.SeriesCollection(2).Values = "=SPEC!$B$6:$J$6" ActiveChart.SeriesCollection.NewSeries ActiveChart.SeriesCollectio
代码是
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(2).XValues = "=SPEC!$B$2:$J$2"
ActiveChart.SeriesCollection(2).Values = "=SPEC!$B$6:$J$6"
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(3).Values = "=reference_curve!$D$4:$D$303"
ActiveChart.SeriesCollection(3).XValues = "=reference_curve!$C$4:$C$303"`
它工作正常,但问题是我想使用范围变量来选择数据,例如
dim test as range
test = "=SPEC!$B$6:$J$6"
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(2).XValues = "=SPEC!$B$2:$J$2"
ActiveChart.SeriesCollection(2).Values = test
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(3).Values = "=reference_curve!$D$4:$D$303"
ActiveChart.SeriesCollection(3).XValues = "=reference_curve!$C$4:$C$303"
这一个不起作用请帮助我这是如何设置变量来存储范围的:
dim test as range
Set test = Range("SPEC!$B$6:$J$6")