VBAの入口

まず、なにはともあれVBAプログラムが初めての方にとっては何処にプログラムを書けばいいかも解らないですよね、そのあたりから始めようと思います。

それと用語もその都度、ある程度の内容で書いていきます。
VBAとは、Visual Basic for Application といい、マイクロソフト社のプログラム開発言語のひとつです。ここではエクセルにおまけで付いてくる物とお考え下さい。 おまけのくせにすごいことが出来るので、使わない手はありません。
そして、VBAプログラムを作成するお道具やソースを書き込むところを Visual Basic Editor といいます。

早速、Visual Basic Editor （以下VBEと記します）を開いてみましょう。

エクセルを起動した状態で [ Alt + F11] キーを叩いてみて下さい。VBE が起動してきたでしょう。VBE は独立したソフトのような振る舞いを見せます。検証3での動作 ではエクセルが顔を見せませんよね。そのようにエクセルを無視したような動作をさせることも出来るのです。金公はVBAが主であり、ワークシートはおまけの存在と感じています。ちなみに、別売のVBでもほとんど同じインターフェイスです し、動作も大差ありません。部分的にはVBAの方がまさっている事もあります。

VBEは以下の図のような顔をしていて、大きく3つのエリアに分かれています。
左上はプロジェクトといいい、現在のブックの構成を表しています。ワークシートが3枚ある事が解りますよね。ワークシートの下にあるThisWorkbookは自分自身を表しています。
プロジェクトの下はプロパティーでオブジェクトの各要素のプロパティーを設定する事が出来ます。
右のエリアがプログラムの作業場です。
この三つのエリアを使ってプログラムしていくわけですが、画面構成もカスタマズ出来ますので自分好みの配置で結構です。
下の図では既にThisWorkbookのソースコードを書き込む準備が出来ていますが、この状態にするにはプロジェクト内のThisWorkbookと書かれた文字をダブルクリック します。すると作業エリアに新たな窓が現れてくるので、その窓の左上プルダウンからWorkbookを選択してください。窓内に自動的にマクロの名前が書き込まれます。
1行目のOption Explicit は「変数の宣言を強制する」という意味のコードで、自分で直接書き込むことが出来ますが、ツール→オプションでカスタマズしておくと、新規にコードを書こうとすると き、自動で書き込ませるようにすることも可能です。書かなくてもいいけど、これを書いておくといろんな場面で作者のミスによる間違いを見つけてくれるので、書き込んでおいたほうがいいです。
　

1行目　変数の宣言を強制した状態である。
2行目　エクセルが起動したときに自動的にここを読み実行せよ。
3行目　start と云うサブマクロを探してそこに書かれてある内容を実行せよ。
4行目　エクセルを強制終了せよ。
5行目　命令はここでおしまいだ。

と云う内容です。

Workbook_Open のような、「何かしたとき」を感じ取ってプログラムが走るようなマクロを「イベントマクロと云います」
「何かした」 = イベント　と云うことですね。

ここで no3.bat の最終行にあるエクセルを呼び出すバッチコマンドも簡単に説明しておきます。 これはバッチコマンドですからエクセルのVBAとは別物ですが。

REM 金公の超初心者外変検証3
@echo off
REM #jww
REM #cd
REM #h4
REM #e
start /MIN /WAIT EXCEL.EXE no3.xls
　

--------------------------------------------
【 全体の流れ 復習もかねて 】

■　呼び出された外部変形プログラムはJw_cadの画面情報を [ JWC_TEMP.TXT ] に書込する。
■　その後、[ JWC_TEMP.TXT ] を加工させる為にエクセルを起動させる。
■　エクセルはその外部変形プログラムの指令をうけて起動する。
■　起動時に実行しなければならない命令を自分でソースコードを読み始める。

----　ここからエクセルの作業 -------------

■　既に情報の書かれた[ JWC_TEMP.TXT ] を読み込む。
■　その内容から線分情報の個数を調べる。（直線が何本あるか。）
■　線の個数が解れば、その個数（回数）分、あるマクロを繰り返す

---- あるマクロ の内容 ------------------

■　1個の線情報を4つに分けて専用の入れ物に入れる（元の開始点XY座標と終了点座標XY）
■　専用の入れ物に分けられた1本の線情報（座標2点）から正方形を作る為の未知の座標2点を計算させる
■　計算結果を入れる入れ物は正方形を形成する為の元の線分を除いた3本の線情報なので3×4=12個の入れ物に入れていく。
■　各1本の線情報である2点の座標値（X、Y）をJw_cadが認識出来るように半角スペースで区切る形で組立る。
■　組立られた1本の線情報を専用の入れ物に入れ、元の線分が複数の場合はJw_cadが認識出来るよう、間に改行コードを付ける。
---------------------------------------

■　それを元線分の個数分繰り返しすべての線情報を一つの文字列にして[ JWC_TEMP.TXT ] に上書き保存する。
■　すべての命令に対する作業をこなしたエクセルは自分で強制終了する。
■　エクセルに託した[ JWC_TEMP.TXT ] 加工作業の終了を待っていた外部変形プログラムは加工済みの[ JWC_TEMP.TXT ] を見ながらJw_cadに作図していく。

以上のような流れで外部変形作業が実行されて行くわけですが、あるマクロの部分で線分の座標値を計算、決定して行くにあたり、正方形を一つ作るだけの場合は気づかないことですが、はじめから正方形が書かれてあるような場合、正常動作で終わっても正方形が作成されていないように見える可能性があります。 重複線になってしまっているからです。原因は線分の開始座標と終了座標の関係を無視したプログラムの時に起こりえます。

-----------　金公が気づいた座標点を指定して線を引くときの問題

線を引くとき左から右へ線を引いたときと右から左に向かって線を引いたときとでは、見た目は同じでもCADの内部で処理されている情報は全然違った物になります。今回の正方形の例から云うと、金公の希望は水平線の上に正方形を作成しようと思いました。上から下に向かって垂直線を引いた場合は右に正方形を作りたいのです。しかし、右から左に向かって水平線を引いた場合、正方形は下に出来るのです。

極論を述べますが、CADは単純です。文字やCADを構成している要素を別として、データ部に限って云うと、どんな複雑な図面でもCADから見ると線情報と円弧情報でしかないのです。ただし、操作する人の考えなど無視して正確な情報を蓄えていきます。その事 への理解が外部変形プログラムの最大の注意点ではないかと思いました。

以上の事をふまえてプログラム中心部、標準マクロ（start）の解説に入ります。

標準マクロはイベントマクロと違い自分で動き出すことはありません。
誰かに呼ばれて動き出すマクロの事を云います。
ソースコードを書き込む場所（モジュール）も違います。
まず、モジュールを表示させましょう。挿入→標準モジュール　で作業エリアに新しい窓が出てきます。

標準マクロは、イベントマクロのようにプルダウンから選択して勝手にコードが書き込まれるわけでなく、自分でマクロ名（プロシージャ）を決めて書き込まなくてはなりません。
金公は start と自分の意志で名前を決め書き始めましたが、貴方の好きな名前でいいのです。その時は Workbook_Open 内のマクロ呼出する部分の文字も同じ名前を指定しましょう。

以下、マクロコード内に解説文を直接書き込んでいきます。

------ 標準マクロ ----------------------------------------------------------

ここでの作業は以下につづく動的配列に入れるために元の線分の数を調べる（数えるための部分）のが目的です。
結果は i に線分の個数が入ります。

動的配列に線分の個数を入れる際（ i - 1 ）となっているのは線分の個数は1から始まるが、配列は0から始まるので1を引かないと実際の線分個数と配列に入れる個数の数が合わなくなる為です。

Dchck が Falseであるかぎり、線分の計算や記憶作業は行われず、If moji2 = "#" Then Dchck = True　の部分へいきなりやってきてmoji2のデータに"#"が入っているかチェックします。

プロシージャ start のすべてのプログラムは終了、呼出元である Workbook_Open に制御をうつす。
その後、Workbook_Open 内のstartの次の行 Application.Quit が実行されエクセルは終了。
それを待っていた外部変更プログラム（no3.bat）が JWC_TEMP.TXT のデータが変更されていることを関知して　JWC_TEMP.TXT のデータを元に Jw_cad に作図開始。
外部変形プログラムの終了。

以上で検証3の解説は終了です、お疲れさまでした。