1
このグラフは、線の色が変更されていないことを除き、機能します。ExcelグラフVBAスキャタプロットの線の色を変更
Sheets("Analysis").ChartObjects("Chart 1").Activate
With Sheets("Analysis").ChartObjects("Chart 1").Chart.SeriesCollection(1)
.XValues = Sheets("Data").Range("A2:A33")
.Values = Sheets("Data").Range("B2:B33")
.Name = "Plot1"
.Interior.Color = RGB(100, 0, 100)
End With