软件: Excel 20130
表格:
1月1日 1月2日 1月3日 1月4日
A 66 5 85 52
B 54 15 47 63
C 32 26 51 85
D 65 34 68 94
以上是我的表格 我想要分别画出4张表格
第一张 : X轴为1/1~1/4, Y轴为66 5 85 52(A列)
第二张 : X轴为1/1~1/4, Y轴为54 15 47 63(B列)
第三张 : X轴为1/1~1/4, Y轴为32 26 51 85(C列)
第四张...以此类推 以下为我的程式
Sub test()
ActiveSheet.ChartObjects.Add(30, 200, 300, 200).Select
ActiveChart.ChartType = xlLineMarkersStacked
ActiveChart.SetSourceData Source:=
Range("工作表1!$B$1:$F$1,工作表1!$B5:$F5") <