原因は、VBAが未宣言の変数を自動的に作ってしまう仕組みにあります。スペルミスに気づけず、バグの特定に何時間もかかることも珍しくありません。

そんなトラブルを防いでくれるのが Option Explicit です。この記事では、VBA Option Explicitの意味・設定方法・実践コードをまとめて紹介します。

NOTE

VBEの起動方法や画面の見方は「VBE画面の見方」で解説しています。Alt + F11 でVBEを起動し、「挿入」→「標準モジュール」でコードを書く準備ができます。

VBA Option Explicitとは？

Option Explicit は、モジュール内のすべての変数に Dim などの宣言を必須にする命令です。

モジュールの先頭（宣言セクション）に1行書くだけでOK。宣言なしの変数があると コンパイルエラー になるので、スペルミスや未宣言の変数を即座に検出できます。

Option Explicit  '← モジュールの先頭に書くだけ

Sub SampleMacro()
    Dim sName As String '--- 変数を宣言してから使う ---
    sName = "田中太郎"
    MsgBox sName
End Sub

TIP

Option Explicitはモジュール単位で適用されます。プロジェクト内のすべてのモジュールに記述するか、後述の自動設定を有効にしておきましょう。

Option Explicitがないとどうなる？（スペルミスバグの実例）

「Option Explicitなしでも動くなら、なくていいのでは？」と思うかもしれません。でも実務では、これが原因で見つけにくいバグが発生します。

タイプミスで別変数が作られる

次のコードを見てください。total と書くべきところを totla とタイプミスしています。

Sub CalcWithoutOptionExplicit()
    Dim total As Long '--- 合計金額 ---
    total = 1000

    '--- タイプミスに気づかない ---
    totla = totla + 500  '← total ではなく totla

    MsgBox "合計: " & total  '--- 結果は 1000（500が加算されていない）---
End Sub

このコードを実行すると、エラーは出ません。totla が新しいVariant型変数として自動作成され、total には500が加算されないまま処理が進みます。結果は「合計: 1000」と表示されます。

金額計算でこのバグが混入すると、集計結果が数十万円ずれることもあります。しかもエラーが出ないので、数字を見比べるまで間違いに気づけません。

Option Explicitありなら一瞬で発見

同じコードにOption Explicitを付けると、結果はこう変わります。

Option Explicit

Sub CalcWithOptionExplicit()
    Dim total As Long '--- 合計金額 ---
    total = 1000

    '--- タイプミスに気づかない ---
    totla = totla + 500  '← ここでコンパイルエラーが発生
End Sub

F5キーで実行した瞬間、「コンパイル エラー: 変数が定義されていません。」と表示されます。totla がハイライトされるので、スペルミスの場所が一目瞭然です。

Option Explicitなしで起きる3つのトラブル

NOTE

数百行のマクロでこのバグが発生すると、原因の特定に何時間もかかります。Option Explicitを設定しておけば一瞬で見つかりますよ。変数の値をリアルタイムで追跡したいときは「ローカルウィンドウ」も合わせて使うと効率的です。

Option Explicitの基本的な使い方

宣言セクションに記述する

Option Explicitは、モジュールの 一番上（宣言セクション）に記述します。

Option Explicit

Sub SampleMacro()
    Dim sName As String '--- 氏名 ---
    sName = "田中太郎"
    MsgBox sName
End Sub

Option Explicit と Sub の間に区切り線が自動表示されます。宣言セクションとプロシージャの境目です。

動作確認してみよう

宣言した変数名と違う名前を使うとどうなるか、試してみましょう。

Option Explicit

Sub TestWithOptionExplicit()
    Dim sName As String '--- 氏名 ---
    sName = "田中太郎"

    '--- わざとスペルミスをする ---
    MsgBox sNaem  '← ここでコンパイルエラーが発生
End Sub

このコードをF5キーで実行すると sNaem がハイライトされます。スペルミスを即発見できますね。

比較として、Option Explicitがない場合も見てみましょう。

Sub TestWithoutOptionExplicit()
    Dim sName As String '--- 氏名 ---
    sName = "田中太郎"

    '--- わざとスペルミスをする ---
    MsgBox sNaem  '← エラーにならず空白のメッセージが表示される
End Sub

こちらはエラーが出ません。空のメッセージボックス が表示されるだけです。sNaem がVariant型変数として自動作成され、値はEmpty（空）になります。

Option Explicitを自動入力する設定方法

毎回手入力するのは手間ですよね。VBEの設定を変更すれば、新規モジュール作成時に自動で入力されるようになります。

VBEのオプションで「変数の宣言を強制する」を有効にする

1. VBEのメニューバーから [ツール] → [オプション] を開く
2. [編集] タブの「変数の宣言を強制する」にチェックを入れる
3. [OK] をクリック

これで、新しくモジュールを挿入するたびに Option Explicit が自動挿入されます。

既存モジュールへの反映

注意点がひとつあります。この設定は 新規モジュールにのみ 適用されます。

設定を有効にする前に作成したモジュールには反映されません。既存モジュールには手動で先頭に Option Explicit を追記してください。

TIP

まだ設定していない方は、この記事を読んでいる今がチャンスです。VBEを開いて [ツール] → [オプション] から設定しておきましょう。

変数の型宣言と組み合わせてVBAの品質を上げる

Option Explicitを設定すると、変数の型を意識する習慣が自然につきます。適切な型を指定すれば、処理速度とメモリ効率が改善しますよ。

よく使う型とメモリ比較

Variant型は便利ですが、Long型の4倍以上のメモリを消費します。大量データのマクロでは体感できるほど差が出ます。

型宣言を活かした実務コード

Rangeで最終行まで処理するコードを例に見てみましょう。

Option Explicit

Sub SpeedOptimizedMacro()
    Dim ws As Worksheet '--- 対象シート ---
    Dim i As Long '--- 行カウンター ---
    Dim lLastRow As Long '--- 最終行 ---
    Dim sResult As String '--- 処理結果 ---

    Set ws = ThisWorkbook.Sheets("Sheet1")
    lLastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row

    '--- A列の値を順番に処理する ---
    For i = 2 To lLastRow
        If ws.Range("A" & i).Value <> "" Then
            sResult = sResult & ws.Range("A" & i).Value & vbCrLf
        End If
    Next i

    MsgBox "処理結果:" & vbCrLf & sResult
End Sub

すべての変数に型を指定しているので、スペルミスも型の曖昧さも発生しません。Do Loopを使う場合も同様に、ループ変数を Long で宣言しておくのがおすすめです。

定数（Const）との併用パターン

Option Explicitと合わせて、変更しない値は定数（Const）で宣言するのがおすすめです。

Option Explicit

'--- 定数の宣言 ---
Const START_ROW As Long = 2 '--- データ開始行 ---
Const SHEET_NAME As String = "売上データ" '--- 対象シート名 ---

Sub ProcessSalesData()
    Dim ws As Worksheet '--- 対象シート ---
    Dim i As Long '--- 行カウンター ---
    Dim lLastRow As Long '--- 最終行 ---
    Dim dTotal As Double '--- 合計金額 ---

    Set ws = ThisWorkbook.Sheets(SHEET_NAME)
    lLastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row

    '--- 売上金額を集計する ---
    For i = START_ROW To lLastRow
        dTotal = dTotal + ws.Range("C" & i).Value
    Next i

    MsgBox SHEET_NAME & "の合計金額: " & Format(dTotal, "#,##0") & "円"
End Sub

定数を使うメリットは2つあります。

• 変更が1か所で済む: シート名や開始行を変えたいとき、定数の値を変えるだけでOK
• 誤って値を変更できない: 定数に値を代入しようとするとコンパイルエラーになる

Option Explicitを使い忘れるパターンと対策

「設定したつもりなのに効いていない」というケースもあります。よくある原因を整理しておきましょう。

TIP

プロジェクトエクスプローラーで各モジュールを開き、先頭に Option Explicit があるか1つずつ確認するのが確実です。数が多いときは面倒ですが、一度チェックしてしまえば安心ですよ。

よくあるエラーと対処法

Option Explicitを使い始めると、いくつかのエラーに遭遇することがあります。

NOTE

「変数が定義されていません。」エラーが出たときは慌てなくて大丈夫です。VBEが原因の変数をハイライトしてくれるので、スペルを確認するか Dim 宣言を追加しましょう。

チームでVBAを管理するときのOption Explicit運用ルール

複数人がVBAを編集するプロジェクトでは、Option Explicitの有無がバグの温床になります。個人で使うときより一歩踏み込んだ運用ルールを決めておくと、引き継ぎのトラブルを減らせます。

全モジュールへの一括確認方法

プロジェクトを引き継いだ際は、すべてのモジュールにOption Explicitが書かれているか確認します。VBEのメニューから「編集 → 検索」で Option Explicit を検索し、ヒットしないモジュールを洗い出す方法が手早いです。

モジュールの種類ごとに確認する優先度は次の通りです。

新規モジュール作成時のミスを防ぐ

VBEの「ツール → オプション → 変数の宣言を強制する」にチェックを入れると、新しいモジュールを作成するたびにOption Explicitが自動挿入されます。チームメンバー全員にこの設定を徹底するのが最も確実な予防策です。

既存モジュールには自動設定の効果はないため、過去に作成されたファイルは手動で追記が必要です。VBAの変数宣言とデータ型の基礎も合わせて確認しておくと、Dim宣言の追加作業がスムーズです。

プロシージャをまたいだ変数に注意する

Option Explicitを後から追加した際にエラーになりやすいのが、プロシージャの外（モジュールレベル）に書かれた変数です。複数のSubやFunctionが同じ変数を共有している場合、その変数の宣言箇所を見落とすとエラーが出続けます。

Option Explicit

' モジュールレベル変数（全プロシージャから参照可）
Private wsTarget As Worksheet
Private lastRow As Long

モジュールレベル変数はPrivateで宣言し、必要な場合のみPublicにするのがプロジェクト・モジュール構成の基本です。

Option Explicitのよくある質問（FAQ）

Q1. Option ExplicitはすべてのモジュールタイプでDimを要求する？

はい。標準モジュール、クラスモジュール、UserFormのコードビハインド、オブジェクトモジュール（Sheet1やThisWorkbookなど）のいずれでも、Option Explicitを記述するとそのモジュール内のすべての変数にDim/Public/Private/Staticいずれかの宣言が必要になります。

モジュールをまたいだ設定（プロジェクト全体への一括設定）はできません。VBEのオプションで「変数の宣言を強制する」を有効にしておくと、新しく作ったモジュールに自動挿入されます。

Q2. Option ExplicitとOption Compareは何が違う？

別の機能です。

• Option Explicit: 変数宣言を強制する（未宣言変数のコンパイルエラー検出）
• Option Compare Text / Binary: 文字列比較の大文字・小文字の扱いを設定する

Option Compare Textを設定すると「A」と「a」を同一として比較します。Option Compare Binary（デフォルト）はバイナリ比較なので「A」≠「a」です。Option Explicitとは目的がまったく異なりますが、同じ宣言セクションに複数記述できます。

Option Explicit
Option Compare Text

Q3. On Error Resume Nextと組み合わせると効果が薄まる？

その通りです。On Error Resume Next をコード中に記述するとエラーが発生しても処理が続行されます。Option Explicitのコンパイルエラーは実行前に検出されるため影響を受けませんが、実行時エラーについてはOn Errorで回避されます。

デバッグをしやすくするためにも、On Error Resume Nextの使用箇所は最小限にとどめ、エラー処理は On Error GoTo ErrorHandler パターンで明示的に書くのがVBAのベストプラクティスです。

Q4. Option ExplicitなしでDimだけを使えばよいのでは？

Dimを書いても、書き忘れた変数（タイプミスで生まれた変数）はVariant型として自動作成されます。Option Explicitがないと「宣言した変数名と違う名前」を使ってもエラーにならないのが問題です。

Option ExplicitはDimの書き忘れと同時に「宣言していない変数へのアクセス」を禁止するので、スペルミス由来のバグを確実に防げます。両方を組み合わせて使うことに意味があります。

Q5. 後からOption Explicitを追加すると既存コードは壊れる？

Option Explicitを追加した時点で、そのモジュール内に未宣言の変数があればコンパイルエラーになります。ただし「壊れる」のではなく「未宣言だった変数が可視化される」というのが正確です。

追加後にF5キーで実行すると、コンパイルエラーで未宣言変数がハイライトされます。表示された変数を確認しながら順番にDim宣言を追加していけばOKです。既存コードが多い場合は、一気に修正しようとせず、エラー1件ずつ対処するのがやりやすいですよ。

まとめ

Option Explicitは、VBAの品質を底上げしてくれる設定です。この記事の内容を振り返っておきましょう。

まだ設定していない方は、今すぐVBEを開いて設定してみてください。たった1回の操作でデバッグ時間が大幅に減りますよ。

関連記事

VBAの基礎を固めたい方は、こちらの記事もあわせてどうぞ。

• VBE画面の見方
• 変数の使い方とルール
• Rangeの使い方
• Do Loopの使い方
• ローカルウィンドウの使い方
• Like演算子の使い方

「変数って何？」「どう書けばいいの？」と感じる方も多いですよね。簡単なマクロなら変数なしでも動きますが、少し規模が大きくなると変数の知識が欠かせません。

この記事では、VBA変数の基本から宣言方法、データ型の選び方、命名ルールまでまとめて解説します。コピペで動くコード例もあるので、実際に手を動かしながら読み進めてみてください。

VBAの変数とは

変数は「名前付きの箱」

変数とは、データを一時的に入れておける「名前付きの箱」です。

たとえば「りんご」という文字列を保管したい場合、fruit という名前の箱を用意して、そこに「りんご」を入れます。数値の100を保管したいなら、totalCount という名前の箱に100を入れるイメージです。

この「箱の名前」のことを変数名と呼びます。変数名は自分で好きに決められますが、いくつかルールがあります（後ほど詳しく解説します）。

変数を使うメリット

「わざわざ箱に入れなくても、直接値を書けばいいのでは？」と思うかもしれません。

変数を使う最大のメリットは、修正が一箇所で済むことです。具体的なコード例で確認しましょう。

変数を使わないコードでは、同じ値が複数の場所に散らばります。

Sub SampleWithoutVariable()
    MsgBox "りんごを食べることで、りんご特有の味わいが広がります。"
    MsgBox "想像するだけで食欲をそそられるりんごですが、" & vbCrLf & _
           "私はりんごが大好きです。"
End Sub

この文章の「りんご」を「オレンジ」に変えたい場合、すべての「りんご」を1つずつ書き換える必要があります。

一方、変数を使ったコードなら修正は1箇所だけです。

Sub SampleWithVariable()
    Dim fruit As String '果物名を格納する変数
    fruit = "りんご"

    MsgBox fruit & "を食べることで、" & fruit & "特有の味わいが広がります。"
    MsgBox "想像するだけで食欲をそそられる" & fruit & "ですが、" & vbCrLf & _
           "私は" & fruit & "が大好きです。"
End Sub

fruit = "りんご" の部分を fruit = "オレンジ" に変えるだけで、すべてのメッセージが一括で変わります。

このように、変数を使うと以下のメリットがあります。

• 修正が1箇所で済む: 同じ値を何度も書き換える手間がなくなる
• コードが読みやすくなる: 変数名から「何のデータか」がわかる
• 計算結果を再利用できる: 一度計算した結果を変数に入れておけば、何度でも使い回せる
• バグを減らせる: 値の書き間違いや修正漏れを防止できる

変数名の命名ルール

守るべき4つのルール

変数名は自由に決められますが、以下の4つのルールは必ず守ってください。ルールに違反するとエラーになります。

スペースや記号（- ! @ など）は使えません。また、VBAの予約語（Sub、Dim、If など）も変数名にはできません。

実務で使える命名パターン

ルールを守るだけなら簡単ですが、実務では「後から見てもわかりやすい名前」を付けることが大切です。

よく使われる命名パターンを紹介します。

チームで運用するマクロの場合は、命名規則を統一しておくと引き継ぎがスムーズになります。個人利用なら、自分が読み返してすぐにわかる名前であれば問題ありません。

日本語の変数名は使える？

結論から言うと、個人で使う分には問題ありません。

過去のExcelバージョンでは日本語の変数名が原因でエラーが出ることもありましたが、現在のExcel（2019 / 2021 / Microsoft 365）では解消されています。

ただし、以下の点は意識しておきましょう。

• 海外のVBAサンプルコードと混在すると読みにくくなる
• 将来的に他のプログラミング言語に移行する際、日本語変数名の習慣がネックになる可能性がある
• 全角・半角の入力ミスでエラーになるケースがある

実務で迷ったら、英語のキャメルケース（userName のような書き方）がおすすめです。VBAの公式ドキュメントやサンプルコードのほとんどが英語で書かれているため、学習効率も上がります。

データ型の一覧と選び方

よく使うデータ型一覧

変数に入れるデータの種類を指定するのが「データ型」です。箱のサイズや形を決めるようなイメージで考えてください。

VBAで業務によく使うデータ型を以下の表にまとめました。

NOTE

Integer（整数型）もありますが、扱える範囲が -32,768 ~ 32,767 と狭いため、整数には Long を使うのが現在の主流です。VBAの内部処理でも Integer は Long に変換されるため、最初から Long を選んで問題ありません。

データ型を省略するとどうなる？

データ型を指定しない場合、自動的に Variant 型になります。

Dim myValue '← データ型を省略すると Variant 型になる

Variant 型はどんなデータでも入れられるので便利に思えますが、次のデメリットがあります。

• メモリを多く消費する: 他のデータ型の数倍のメモリを使う
• 処理速度が遅くなる: データ型の判定が毎回発生する
• 型の不一致によるバグが起きやすい: 数値のつもりが文字列として扱われることがある

入れるデータが決まっているなら、必ずデータ型を指定しましょう。迷ったときの選び方は次の通りです。

• 文字を入れる → String
• 整数を入れる → Long
• 小数を入れる → Double
• 日付を入れる → Date
• True/Falseを入れる → Boolean
• セルの値で型が不定 → Variant

変数の宣言方法（Dim文の書き方）

基本の宣言

変数を使うには、最初に「宣言」が必要です。宣言とは「この名前で、この型の箱を用意します」とVBAに伝えることです。

Dim 文を使って次のように書きます。

Dim 変数名 As データ型

具体例を見てみましょう。

Dim userName As String    '文字列を入れる変数
Dim rowCount As Long      '整数を入れる変数
Dim taxRate As Double     '小数を入れる変数
Dim startDate As Date     '日付を入れる変数
Dim isFinished As Boolean 'True/Falseを入れる変数

Dim、変数名、As、データ型の間は、それぞれ半角スペースで区切ります。スペースがないとエラーになるので注意してください。

値の代入

宣言した変数にデータを入れることを「代入」と言います。=（イコール）を使って次のように書きます。

Dim userName As String
userName = "田中太郎"

Dim rowCount As Long
rowCount = 100

Dim taxRate As Double
taxRate = 0.1

文字列を代入する場合は、値をダブルクォーテーション（"）で囲みます。数値や True / False にはダブルクォーテーションは不要です。

WARNING

オブジェクト型（Worksheet、Range など）に代入する場合は Set 文を使います。Set を付け忘れると実行時エラーになります。
vba
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Sheet1") 'Setが必要


複数の変数をまとめて宣言

同じデータ型の変数が複数ある場合、1行にまとめたくなるかもしれません。ただし、VBAでは次の書き方に注意が必要です。

'NG: aとbはVariant型になってしまう
Dim a, b, c As Long

'OK: すべてLong型で宣言される
Dim a As Long, b As Long, c As Long

カンマで区切っても、As Long は最後の変数にしか適用されません。すべての変数にデータ型を明示するのが正しい書き方です。

変数を使った実践コード

ここまでの知識を使って、実務で役立つコードを書いてみましょう。

基本コード: セルの値を変数で操作する

Sub BasicVariableExample()
    Dim productName As String '商品名
    Dim unitPrice As Long     '単価
    Dim quantity As Long      '数量
    Dim totalPrice As Long    '合計金額

    '変数にセルの値を代入
    productName = Range("A2").Value
    unitPrice = Range("B2").Value
    quantity = Range("C2").Value

    '計算結果を変数に格納
    totalPrice = unitPrice * quantity

    '結果をセルに書き出す
    Range("D2").Value = totalPrice

    MsgBox productName & "の合計金額は " & totalPrice & " 円です。"
End Sub

このコードの流れを整理します。

1. 4つの変数を宣言（商品名・単価・数量・合計金額）
2. セルA2~C2の値を変数に代入
3. 単価 x 数量の計算結果を totalPrice に格納
4. 結果をセルD2に書き出し、メッセージボックスで表示

変数を使うことで「何のデータを操作しているか」がコードを読むだけでわかります。

応用コード: 複数行を一括処理する

Sub CalculateAllRows()
    Dim lastRow As Long       '最終行
    Dim i As Long             'ループカウンター
    Dim unitPrice As Long     '単価
    Dim quantity As Long      '数量

    '最終行を取得
    lastRow = Cells(Rows.Count, "A").End(xlUp).Row

    'データ行をループ処理（2行目から）
    For i = 2 To lastRow
        unitPrice = Cells(i, 2).Value  'B列: 単価
        quantity = Cells(i, 3).Value   'C列: 数量

        '合計金額をD列に出力
        Cells(i, 4).Value = unitPrice * quantity
    Next i

    MsgBox "計算が完了しました。対象: " & (lastRow - 1) & " 件"
End Sub

このコードでは、For文で変数 i を使ってデータの行数分だけ処理を繰り返しています。ループ処理は変数の代表的な活用場面です。

For文の詳しい使い方は、以下の記事で解説しています。

VBA For~Next文の使い方｜繰り返し処理の基本から実務パターンまで解説

Option Explicitで変数宣言を強制する

VBAには、宣言していない変数を使うとエラーにしてくれる便利な機能があります。それが Option Explicit です。

モジュールの先頭に次の1行を追加するだけで有効になります。

Option Explicit

Sub MySample()
    Dim userName As String
    userName = "田中"

    'userNameのスペルミス → コンパイルエラーで教えてくれる
    MsgBox userNme '← "a"が抜けているが、Option Explicitがあればエラーになる
End Sub

Option Explicit がない場合、userNme は新しい空の変数として自動作成されてしまいます。エラーにならないため、原因の特定に時間がかかるバグの温床になります。

VBEのオプション設定で「変数の宣言を強制する」にチェックを入れると、新しいモジュールに自動で Option Explicit が挿入されます。特別な理由がない限り、有効にしておくことを強くおすすめします。

Option Explicitの設定手順や実践的な使い方は、以下の記事で詳しく解説しています。

【VBA】Option Explicitで変数の宣言を強制する方法｜設定と使い方を解説

まとめ

VBA変数の基本を振り返りましょう。

• 変数とは: データを一時的に入れておく「名前付きの箱」
• 宣言方法: Dim 変数名 As データ型 で書く
• 命名ルール: 英数字・日本語・アンダーバーのみ、先頭に数字は不可、255文字以内
• データ型: 文字は String、整数は Long、小数は Double が基本
• Variant型の注意: 便利だが、メモリ消費やバグの原因になりやすい
• Option Explicit: 変数宣言の強制を有効にしてバグを未然に防ぐ

変数は最初のうちは面倒に感じるかもしれませんが、コードが増えるほど威力を発揮します。まずはよく使う値を変数に入れて使い回すことから始めてみてください。

VBAの基礎をもっと学びたい方は、以下の記事もあわせてご覧ください。

• Excel VBAとマクロの違い｜関係性と活用例を初心者向けに解説
• VBAのプロジェクト・モジュール・プロシージャの違いと役割を解説
• VBA If文の使い方｜条件分岐を基本から実務コードまで解説