グラフを作成: Shapes.AddChart, ChartObjects.Add

グラフを作成します。実はものすごく簡単で、以下の1行で終了です。

Sub test()   ActiveSheet.Shapes.AddChart End Sub

他の方法でも図を追加でき、下の例では最初に表示する大きさ、場所を指定できます。

Sub test()   Set fig = ActiveSheet.ChartObjects.Add(120, 15, 200, 150) End Sub

数値は左端からの座標、上端からの座標、初期サイズの幅、初期サイズの高さを指定する。