Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

46660 / 76732

←次へ　｜　前へ→


	【35040】Re:グラフの作図をマクロに登録すると

miku02 - 06/2/20(月) 0:09 -


	引用なし

	パスワード

ありがとうございます。

参照される元データを、作業をしているシートに指定するにはどのような方法があるのでしょうか？

私が作ったマクロは下記の通りです。

Sub Macro1()
　　ActiveCell.Columns("A:E").EntireColumn.Select
　　Charts.Add
　　ActiveChart.ChartType = xlStockVOHLC
　　ActiveChart.SetSourceData Source:=Sheets("ソニ").Range("A1:E3084"), PlotBy:= _
　　　　xlColumns
　　ActiveChart.Location Where:=xlLocationAsObject, Name:="ソニ"
End Sub

Sheets("ソニ")の部分などを色々変えて試したのですが、行き詰まってしまいました。。。。。

元のデータは下記の通りで株価チャート用のものです。

913100　　　　5710　　　　5720　　　　5700　　　　5700
273400　　　　5710　　　　5760　　　　5700　　　　5760
243600　　　　5770　　　　5780　　　　5760　　　　5770
203800　　　　5780　　　　5780　　　　5760　　　　5760
86300　　　　5750　　　　5750　　　　5740　　　　5750
59700　　　　5740　　　　5760　　　　5740　　　　5750
68700　　　　5760　　　　5760　　　　5740　　　　5740
29700　　　　5750　　　　5750　　　　5730　　　　5730
68700　　　　5740　　　　5740　　　　5720　　　　5730
90700　　　　5720　　　　5730　　　　5720　　　　5720
63900　　　　5730　　　　5730　　　　5710　　　　5710
232500　　　　5700　　　　5730　　　　5700　　　　5730
115800　　　　5720　　　　5730　　　　5710　　　　5710
47700　　　　5720　　　　5730　　　　5710　　　　5730
136400　　　　5720　　　　5730　　　　5720　　　　5720
129500　　　　5720　　　　5720　　　　5690　　　　5690
93200　　　　5680　　　　5700　　　　5680　　　　5690
100100　　　　5700　　　　5700　　　　5690　　　　5690
54500　　　　5690　　　　5690　　　　5680　　　　5690
72900　　　　5700　　　　5700　　　　5670　　　　5670
23100　　　　5680　　　　5680　　　　5670　　　　5670
40400　　　　5670　　　　5680　　　　5670　　　　5680
129600　　　　5680　　　　5690　　　　5680　　　　5680
93400　　　　5690　　　　5690　　　　5670　　　　5680
26600　　　　5680　　　　5690　　　　5680　　　　5690
74500　　　　5680　　　　5690　　　　5670　　　　5680

マクロ記録の過程は、

Ａ列～Ｅ列をShiftを押して指定　→　グラフウィザード　→　株価　→　株価チャート（出来高-始値-高値-安値）という風にやりました。

よろしくお願いします。

11 hits

▼

【35038】グラフの作図をマクロに登録すると miku02 06/2/19(日) 21:58