回答編集履歴

1

誤字修正等

2017/06/21 06:22

投稿

退会済みユーザー
test CHANGED
@@ -1,14 +1,12 @@
1
- 検証をしっかりしていませんが、`With ActiveSheet.ChartObjects`が悪さをしてforループの度に「グラフのオブジェクト全てを毎度一括で位置合わせ」います。
1
+ 恐らく、`With ActiveSheet.ChartObjects`となっいるので、forループの度に「グラフのオブジェクト全てを毎度一括で位置合わせ」をしています。つまるところ、forループの最後のグラフの位置に、すべてのグラフが重なっているようです。
2
2
 
3
3
 
4
4
 
5
- なので、やることは、グラフを作り終った後にforループの中でも外でも良いので、1つ1つ位置を合わせて行くことです。
5
+ なので、やることは、グラフを作り終った後に、作ったグラフに対してforループの中でも外でも良いので、1つ1つ位置を合わせて行くことです。
6
6
 
7
7
 
8
8
 
9
- 雰囲気だけでが・・・
9
+ 下の例はグラフを作り終わった後に、最後にべてのグラフを位置合わせしています。
10
-
11
-
12
10
 
13
11
  ```VBA
14
12
 
@@ -82,6 +80,8 @@
82
80
 
83
81
 
84
82
 
83
+ 困ったら[VBAでのグラフ作成](http://www.atmarkit.co.jp/ait/articles/1409/18/news040.html)を参照ください。
85
84
 
86
85
 
86
+
87
- 困った[VBAでのグラフ作成](http://www.atmarkit.co.jp/ait/articles/1409/18/news040.html)参照ください
87
+ ///このようにやなくても、グラフるたびにグラフの名前拾って位置を合わせる、もできそうですね