0

このコードを使用してグラフのプロットをループしたい:

1  For i = 354 To 357

2    Range((Cells(208, 353)), Cells(219, 353)).Select
3    Range(Cells(208, i), Cells(219, i)).Select

4    ActiveSheet.Shapes.AddChart.Select
5    ActiveChart.ChartType = xlColumnClustered
6   ' ActiveChart.SetSourceData Source:=Range("Sheet2!Cells(208,354):Cells(219,354)")
7    ActiveChart.Axes(xlValue).MajorGridlines.Select
8    Application.WindowState = xlMaximized
9    ActiveChart.ApplyLayout (9)

10    Next i
11 End Sub

ただし、6行目に実行時エラーがあります。誰か助けてもらえますか?

乾杯

4

1 に答える 1