回复 4楼 lianyicq
我现在就纠结在这个问题上
For i = 1 To Num_Damper_Corner
Chart_damper.SeriesCollection.NewSeries
Set ChartRange = SheetDamper1.Range(Cells(7, Num_Damper_Mode * (i - 1) + 2), Cells(7, Num_Damper_Mode * (i - 1) + 6))
Chart_damper.FullSeriesCollection(i).XValues = "数据!$B$6:$F$6"
Chart_damper.FullSeriesCollection(i).Values = ChartRange
Next i
按你说的方法,定义单元格范围用rang("b7","f7")可以,但用上面的cell就不行