Excel 用VBA绘制可变区域的折线图，怎么实现

Question

如题所述

Answer 1

这里有一例供参考，如何还不可以的话，可以提供技术支持。
Sub AddNewSeries()
Dim MyNewSrs As Series
Set MyNewSrs = ActiveChart.SeriesCollection.NewSeries
With MyNewSrs
.Name = "Fred"
.Values = "=Sheet1!Y_Range"
.XValues = Array(1, 2, 3)
End With
End Sub