2013年08月12日
第１９回 出来高
MT4から出来高を取得できるので、補助チャートに表示してみます。
(1) 出来高の表示
Sub 出来高表示(出来高配列, 実表示本数)
Set ch = 補助チャート追加("出来高")
Set sr = ch.seriescollection.NewSeries
sr.ChartType = xlColumnClustered
sr.Values = 出来高算出(出来高配列, 実表示本数)
sr.Name = "出来高"
sr.Format.Fill.Solid
sr.Format.Fill.ForeColor.RGB = RGB(255, 0, 0)
sr.Format.Fill.Transparency = 0.2
ch.ChartGroups(1).GapWidth = 0
補助チャート後処理 ch
End Sub
series オブジェクトの ChartType を xlColumnClustered にします。縦棒グラフの指定です。
縦棒を密着させるため ChartGroup オブジェクトの GapWidth をゼロにします。
横の基準線が隠れてしまわないようにするため series オブジェクトの Fill オブジェクトの Transparency を 0.2 にし、すこし透明にします。
series オブジェクトの ForeColor.RGB で色を指定します。
(2) プロパティシートの設定
B10セルをTRUE にすると出来高を表示します。FALSE で非表示です
エクセルファイルです。
ダウンロード
前へ 次へ
【このカテゴリーの最新記事】
-
-
-
no image
-
-
