VBAで散布図を作成したのですが・・・
VBAで散布図を作成したいのですがうまくいかないで困っています。
この散布図はA行とB行をそれぞれ軸として指定しているのですがうまくX軸、Y軸に指定されず2本のグラフが表示されてしまいます。
また範囲指定をC1を変数としてA1からB○まで取りたいのですが最初の範囲指定はうまくいったのですが最後の行の指定がうまくいかずエラーになってしまいます。
(○は"C1の値+4"にしたいのです。)
よろしければ何かヒントでもいいので教えていただけないでしょうか?よろしくお願いします。
(私が書いたVBA↓)
Sub chart1()
Dim sh1 As Worksheet
Set sh1 = Worksheets("Sheet1")
Dim i As Integer
i = Range("C1").Value + 4
Range(Cells(1, 1), Cells(i, 2)).Select
Charts.Add
ActiveChart.ChartType = xlXYScatterSmooth ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range(Cells(1, 1), Cells(i, 2))