【Excel VBA】変数の宣言を必須にする方法

皆さん、こんにちは　エンジニアのIMMRです。

例えば、下記のようなサンプルブックがあったとします。

図１　サンプルブック

これは、セル「A2」に金額（数値）を入力して、プログラムを実行すると２割引き価格がメッセージボックスにて表示されるものです。

プログラムは以下の通りです。

図２　プログラム１

変数の宣言はなくても実行は出来るため、下記のようにすることも可能です。そのため下記のプログラムでも問題ないです。

図３　プログラム２

セル「A2」の箇所に”１０００”という数値を入れて実行してみます。

プログラム１とプログラム２の実行結果は、下記のようになります。

図４　プログラム実行結果１

１０００の８割がメッセージボックスで８００が表示されるので正しいですよね。

では下記のプログラムはどうでしょう？

図５　プログラム３

先ほどと同様にセル「A2」の箇所に”１０００”という数値を入れて実行してみます。

プログラム３の実行結果は、下記のようになります。

図６　プログラム実行結果２

このように何も表示されない結果となります。

図３　プログラム２と図５　プログラム３は

同じように見えますがなんで？と思うかもしれないです。

実は、２つめのプログラムのPrice80の箇所を確認すると

Price80 = Price * 0.8　　→　Price80（ハチ　ゼロ[数字]）

MsgBox Price8O　　　　→　Price8O（ハチ　オー［アルファベット］）

と名前が異なるからです。

Price80（ハチ　ゼロ[数字]）に値を格納しているのに

メッセージボックスでは何も格納していないPrice8O（ハチ　オー［アルファベット］）を表示しています。

そのため、メッセージボックスでは、ブランクが表示されてしまいます。

図５　プログラム３でのPrice80とPrice8Oでは

似ているので見間違えることもありますよね。

言われて良～く見ると異なっているのがわかりますが、言われなかったら気づかないと思います。　※私も見逃すと思います。・・・

このように変数の宣言を必須にしないと思わぬ結果が出力されて、

確認作業が増えてしまいます。

変数の宣言を必須にすると今回のような記載ミスを気付くことができます。

そのためにも変数を宣言を必須にしたほうがよいのです。

１．変数の宣言を必須にする

変数の宣言を必須にする方法は下記の流れでおこないます。

①「ツール」→「オプション」を選択する。

図７　設定操作１

②「編集」→「変数の宣言を強制する」にチエックを入れる。

③「OK」を押下する。

図８　設定操作２

これで宣言の必須の設定完了です。

これにより、「Option Explicit」という文章がプログラムの上に記載されます。

図５のプログラム３に　変数の宣言文をいくつか追加したものが下記になります。

図８　プログラム３ー２

２．変数の宣言を必須にする（実行）

それでは、上記プログラムを実行してみます。

図９　プログラム３ー２実行結果

エラーの起きたメッセージボックスの変数「Price8O」は変数の定義が出来ていないということは

変数で宣言した「Price80」と異なるものであることがわかります。

変数宣言が出来ていないことでエラーメッセージを表示されるのです。

これにより、変数の宣言を必須にすることができました。