グラフを作成する(埋め込みグラフ)

サンプルソース

' グラフを作成(1)
ActiveSheet.ChartObjects.Add 100, 100, 600, 200
ActiveSheet.ChartObjects(1).Chart.ChartType = xlColumnClustered
ActiveSheet.ChartObjects(1).Chart.SetSourceData Source:=Range("A1:B3")

' グラフを作成(2)
With ActiveSheet.ChartObjects.Add(30, 50, 300, 200).Chart
    .ChartType = xlColumnClustered
    .SetSourceData Source:=Range("A1:B3")
End With

解説

ChartObjects.Add(Left,Top,Width,Height)で埋め込みグラフ作成します。
Left:左からの位置を指定します。単位はポイント
Top:上からの位置を指定します。単位はポイント
Width:幅を指定します。単位はポイント
Height:高さを指定します。単位はポイント

ChartTypeでグラフの種類を設定します。
SetSourceDataでデータ範囲を設定します。

(1)と(2)は同じ結果になりますが、(2)はWithを使って簡略化できるので便利です。


ChartTypeの設定値
設定内容
xlColumnClustered集合縦棒
xlColumnStacked積み上げ縦棒
xlColumnStacked100100%積み上げ縦棒
xlBarClustered集合横棒
xlBarStacked積み上げ横棒
xlBarStacked100100%積み上げ横棒
xlLine折れ線
xlLineMarkersマーカー付き折れ線
xlLineStacked積み上げ折れ線
xlLineStacked100100%積み上げ折れ線
xlPie
xlXYScatter散布図
xlBoubleバブル
xlArea
xlDoughnutドーナツ
xlSerface等高線
xlStockHLC株価チャート
xlCylinderColClustered円柱
xlConeColColClustered円錐
xlPyramidColColClusteredピラミッド




グラフの操作




Excel VBA講座




アクセスランキング


セルの参照
セルの操作
シートの操作
ブックの操作
ウィンドウの操作
グラフの操作
印刷の操作
ファイル操作
Excel操作


Copyright (C) Excel@Workshop All rights reserved.