Excel マクロでベクトルを描画する方法

Microsoft Excel は、利用可能な最も強力なスプレッドシート プログラムの 1 つであり、財務分析から科学プロジェクトまで、さまざまな活動に役立ちます。ただし、ほとんどの人は、Excel は数式のグリッドの操作、つまり従来のスプレッドシート機能に限定されていると考えています。しかし、Excel の Visual Basic スクリプトを使用すると、それ以上のことを簡単に行うことができます。 VB を使用すると、スプレッドシートに好きな形を描き、それらを使用して描画、チャート、その他のグラフィックを作成し、スプレッドシートを視覚化することができます。
ステップ 1
Microsoft Excel を開きます。 Excel 2007 以降を使用している場合は、リボンの [表示] タブに移動し、[マクロ] をクリックします。それ以外の場合は、[ツール] メニューをクリックし、[マクロ] を選択します。 [マクロ] ダイアログ ボックスが表示されます。
ステップ 2
マクロ名を入力し、「作成」をクリックします。これにより、Visual Basic アプリケーション エディターが開き、新しい空のサブルーチンが画面に表示されます。
ステップ 3
ベクトルの始点と終点に使用する X 座標と Y 座標を決定します。スプレッドシートの左上隅は (0, 0) で、X と Y はそれぞれ右と下に行くにつれて増加します。これらの値を次のように変数に入れます:
start_x =0 start_y =0 end_x =100 end_y =100
これらの値は、スプレッドシートの左上隅に対角線を描画します。必要な場所に線を正確に表示するには、さまざまな数値を試してみる必要がある場合があります。
ステップ 4
線自体を描画するコードを追加します:
line =Sheet1.Shapes.AddLine(start_x, start_y, end_x, end_y)
ステップ 5
ベクトルのように見せるために、行末に矢印を追加するコードを追加します:
line.Line.EndArrowheadStyle =MsoArrowheadStyle.msoArrowheadTriangle
ステップ 6
Visual Basic エディターを閉じて、[マクロ] ダイアログ ボックスを開きます (手順 1 を参照)。マクロをクリックし、[実行] をクリックします。行が表示されるはずです。
ヒント
ステップ 4 で作成した「line」変数を使用して、ベクターの他のプロパティを変更できます。たとえば、線の色を緑に変更するには、「line.Line.ForeColor.RGB =RGB(0, 255, 0)」と記述できます