質問するログイン新規登録

回答編集履歴

2

少し修正

2020/12/09 01:10

投稿

stdio
stdio

スコア3307

answer CHANGED
@@ -2,7 +2,7 @@
2
2
 
3
3
  GraphAggregationButton_Clickのグラフの書き方等は自身で調べて下さい。
4
4
  2本にする方法は[こちら](https://brain.cc.kogakuin.ac.jp/~kanamaru/lecture/vba2003/13-applications02.html)が参考になると思います。
5
- この部分をそちらのデータに書替えれば出来ると思います。
5
+ 特に重要だと思った部分を記載しておきます。
6
6
 
7
7
  ```VBA
8
8
  ActiveChart.SetSourceData Range(Cells(1, 1), Cells(N, 3)), xlColumns ' 離れた列は Union で Range を作成すれば良いル

1

追加

2020/12/09 01:10

投稿

stdio
stdio

スコア3307

answer CHANGED
@@ -6,4 +6,8 @@
6
6
 
7
7
  ```VBA
8
8
  ActiveChart.SetSourceData Range(Cells(1, 1), Cells(N, 3)), xlColumns ' 離れた列は Union で Range を作成すれば良いル
9
+ ```
10
+ ```VBA
11
+ ActiveChart.SeriesCollection(1).Name = "sin(x)"
12
+ ActiveChart.SeriesCollection(2).Name = "cos(x)" ' (グラフ1本なら不要)
9
13
  ```