こんにちは！マクロの記録を卒業して「自分の手で本格的なツールを作りたい」と一歩を踏み出したあなたへ。
Excel VBAを書いていると、最初は「動けばいいや」とモジュールの一番上に `Dim i As Long` なんて適当に変数を置いてしまいがちですよね。でも、ちょっと待ってください。その「とりあえず上の方に書いとけ精神」、実はVBAのパフォーマンスや思わぬバグの温床になっているとしたら……？
今回は、プロのエンジニアが厳しくも優しく教える「変数のスコープ（有効範囲）とライフサイクル（寿命）」の極意についてお話しします。
ここをクリアすれば、あなたの書くコードは一気に洗練され、メモリ効率の良い「プロの挙動」に生まれ変わりますよ。さあ、一緒に扉を開けていきましょう！
—
1. 変数の「寿命」と「居場所」を意識していますか？
VBAで使う変数には、人間と同じように「生まれてから消滅するまでの時間（ライフサイクル）」と「活動できる場所（スコープ）」が決まっています。
これを理解せずに、何でもかんでも「モジュールレベル（一番上）」に定義してしまうと、「プログラムが終了する（またはファイルが閉じる）まで、ずっとメモリを食い潰し続けるゾンビ変数」が大量発生してしまいます。
まずは、この2つの違いを整理しておきましょう。
- プロシージャレベル変数 (`Dim` を Sub や Function の中で使う)
- 寿命: そのプロシージャ（処理）が動いている間だけ。
- 居場所: そのプロシージャの中だけでしか見えない。
- 特徴: 処理が終わった瞬間、メモリからキレイに消え去る（エコ！）。
- モジュールレベル変数 (`Private` や `Dim` をモジュールの最上部に書く)
- 寿命: Excelが立ち上がり、そのモジュールが破棄されるまでずっと。
- 居場所: そのモジュール内のすべてのプロシージャから共有できる。
- 特徴: 便利だけど、どこで書き換えられたか追いにくくなり、メモリも占有し続ける。
—
2. 図解：メモリの使われ方の違い
イメージしやすいように、メモリの使われ方を図解してみましょう。
【プロシージャレベル変数の場合】
Sub 処理A()
Dim count As Long ───(★ここで誕生)
‘ 処理を実行…
End Sub ───(★ここで消滅・メモリ解放！)
【モジュールレベル変数の場合（やりがちなアンチパターン）】
Private globalCount As Long ───(★Excel起動中ずっと居座る)
Sub 処理A()
globalCount = 10
End Sub
Sub 処理B()
MsgBox globalCount ‘ いつでも参照できるが、メモリはずっと占有
End Sub
プロシージャレベル変数は、その仕事が終わればサッと机の上を片付けて帰る優秀な派遣スタッフ。一方、モジュールレベル変数は、用もないのに一日中オフィスに居座る主のような存在です。
—
3. 【実践】メモリ消費を抑える正しいスコープ設計
「じゃあ、どう書くのが正解なの？」という疑問にお答えするために、実際の業務を想定したコードを見てみましょう。
以下のコードは、大量のデータ行を処理するマクロです。必要なときだけ変数を生み出す、美しい設計になっています。
‘ =================================店舗売上集計モジュール=================================
Option Explicit
‘ 【NG例】ここに Dim ws As Worksheet と書かない！
‘ 必要最小限のスコープにとどめるのがプロの鉄則です。
Sub CalculateMonthlySales()
‘ — ① プロシージャレベル変数の宣言（ここで誕生） —
Dim wsTarget As Worksheet
Dim lastRow As Long
Dim i As Long
Dim totalSales As Currency
‘ 処理の開始時にオブジェクトを代入
Set wsTarget = ActiveSheet
‘ 最終行を取得してループ
lastRow = wsTarget.Cells(wsTarget.Rows.Count, “A”).End(xlUp).Row
totalSales = 0
For i = 2 To lastRow
totalSales = totalSales + wsTarget.Cells(i, “B”).Value
Next i
MsgBox “今月の総売上は: ” & Format(totalSales, “#,
0″) & ” 円です”, vbInformation
‘ — ② 明示的なメモリ解放（大きなオブジェクトの場合） —
‘ オブジェクト変数に Nothing を代入してメモリを即座に解放
Set wsTarget = Nothing
‘ このEnd Subを迎えた瞬間、lastRowやiなどの数値変数もメモリから消滅します。
End Sub
このコードの優れたポイント
1. 変数の宣言位置がプロシージャ内（ローカル）: このマクロが動いている間しかメモリを消費しません。
2. `Option Explicit` の徹底: 宣言し忘れによるバグを完全に防ぎます（モジュールの最上部に必ず書きましょう）。
3. オブジェクトの `Nothing` 解放: 処理の最後で `Set wsTarget = Nothing` とすることで、Excelの裏側に残りがちな参照をキレイに掃除しています。
—
4. 初学者が陥りがちな「モジュールレベル変数」の罠
「複数のプロシージャ間でデータを共有したいから」という理由で、安易にモジュールレベル変数を使うのは少し待ってください。
例えば、以下のようなコードは一見便利に見えますが、バグの温床になります。
‘ ⚠️ 悪い見本：モジュールレベル変数の乱用
Private currentUserID As String ‘ どこからでも触れる変数
Sub Step1_Login()
currentUserID = “U12345”
‘ ログイン処理…
End Sub
Sub Step2_ProcessData()
‘ Step1が実行された前提で動くが、もしStep2を直接実行されたら？
MsgBox currentUserID ‘ 空っぽ、または古いデータのまま動き出して大事故に！
End Sub
【プロからのアドバイス】
プロシージャ間でデータを渡したいときは、モジュールレベル変数で隠し球のように共有するのではなく、「引数（ひきすう）」や「戻り値」を使って明示的にデータを渡すのが王道であり、最もバグりにくい設計です。
‘ 💡 良い見本：引数でデータを渡す
Sub MainProcess()
Dim userID As String
userID = LoginProcess() ‘ 戻り値を受け取る
If userID <> “” Then
ProcessData userID ‘ 引数として渡す
End Sub
End Sub
Function LoginProcess() As String
LoginProcess = “U12345”
End Function
Sub ProcessData(ByVal uID As String)
MsgBox “処理対象ユーザー: ” & uID
End Sub
このように書くことで、データの流れが一本の線で見える化され、どこで値が書き換わったのか迷うことがなくなります。
—
まとめ：ここをクリアすれば、Excel VBAの基本はバッチリ！
今回は、モジュールレベル変数とプロシージャレベル変数の違い、そしてメモリ効率を意識したスコープ設計について解説しました。
- 基本は「プロシージャレベル変数（`Dim`）」を使う。
- モジュールレベル変数は、本当に必要な状態保持（フォームや設定値など）のときだけに限定する。
- 使い終わった大きなオブジェクトは `Set ～ = Nothing` で解放する。
- データの受け渡しは変数共有ではなく「引数」を使う。
このルールを守るだけで、あなたの書くVBAコードは動作が軽くなり、何より「バグを探して何時間も悩む無駄な時間」が劇的に減ります。
「動くだけのコード」から「美しくメンテナンスしやすいコード」へ。
今日の学びを、ぜひ次の開発から取り入れてみてくださいね。あなたのVBAライフを心から応援しています！
