こんにちは！マクロの記録から一歩踏み出し、「自分で本格的な業務自動化ツールを作りたい！」と意気込んでいるあなたへ。
VBAのコードを書き進めていくと、最初は数行だったはずが、気づけば何百行もの巨大なプログラムになり、「あれ？ この変数の値、どこで書き換わっちゃったんだっけ……？」と頭を抱えた経験はありませんか？
その悩み、実は「スコープ（変数の有効範囲）」のコントロールを制することで完全に解決できます。
今回は、大規模開発の現場でも絶対に破られていない鉄則「PrivateとPublicの厳格な使い分けルール」について、プロのアーキテクトの視点から優しく、そして本質的に解説していきますね。ここをクリアすれば、あなたのVBAスキルは間違いなくワンランク上のステージに到達しますよ！
—
1. なぜ変数の「公開範囲（スコープ）」が重要なのか？
まずは、イメージしやすいように身近なもので例えてみましょう。
- Public（パブリック）な変数：会社フロアの「誰でも自由に使える共有ホワイトボード」。
- Private（プライベート）な変数：あなたの机の引き出しに入っている「自分専用のメモ帳」。
もし、会社のフロアに置いてあるホワイトボードに、誰が書いたかも分からない重要データが書いてあったらどうでしょう？ 別の人がうっかり消してしまったり、勝手に書き換えたりして大混乱になりますよね。
VBAでも全く同じことが起きます。すべての変数やプロシージャを標準モジュールの上部に `Dim` や `Public` で適当に宣言し、どこからでも触れる状態にしておくことを、プログラミングの世界では「グローバル汚染（スコープの汚染）」と呼びます。
予期せぬバグを防ぎ、メンテしやすい美しいコードを書くための大原則、それは「必要最小限の場所にのみ公開する（カプセル化）」ことです。
—
2. スコープの基本キーワードと「見え方」のルール
VBAにおけるスコープを決定づける主なキーワードは以下の3つです。
1. `Dim`（または `Private`）：宣言したプロシージャ内、あるいはモジュール内だけで有効。
2. `Public`：プロジェクト内のすべてのモジュールからアクセス可能。
ここで、初心者が一番陥りがちな罠を見てみましょう。
陥りがちなエラー：すべてを `Public` にしてしまう悪癖
「どこからでも呼び出せるようにしておけば便利だろう」と、すべての変数やマクロを `Public` にしていませんか？
‘ 【悪い例】標準モジュール：Module1
Public totalCount As Long ‘ ← どこからでも触れる危険な変数
Sub MainProcess()
totalCount = 100
Call SubProcess
‘ ここで totalCount が 100 のままだと思ってたら、
‘ SubProcess内で勝手に書き換えられていてバグ発生！
MsgBox totalCount
End Sub
このコードの規模が大きくなると、「どのマクロがこの変数を書き換えたのか」を特定するのに何時間も溶かすことになります。これがスコープ汚染の恐怖です。
—
3. 実践！PrivateとPublicの厳格な使い分けルール
では、現場のプロはどのように使い分けているのでしょうか。結論からお伝えします。
> 【黄金律】
> 1. 変数は基本的にすべて `Dim`（プロシージャレベル） で閉じ込める。
> 2. 他のモジュールから絶対に呼び出す必要がないマクロには、必ず `Private Sub` を使う。
> 3. `Public` は、ユーザーがExcelの画面から直接実行するメインマクロ（エントリーポイント）か、どうしても共有すべき定数などに限定する。
実際のコードで、このルールに基づいた美しい設計を見てみましょう。
実用的なコード例：安全なデータ処理の設計
‘ =================================================================
‘ モジュール名：modDataProcessor
‘ 概要：データ集計に関する処理をまとめたモジュール
‘ =================================================================
Option Explicit ‘ 宣言漏れをエラーにする（絶対につけましょう！）
‘ 【Publicの例】ユーザーがリボンやボタンから実行する「入り口」のマクロ
Public Sub RunMonthlyReport()
Dim targetSheet As String
targetSheet = “1月度売上”
‘ データを集計する（内部処理を呼び出す）
Call ProcessData(targetSheet)
MsgBox “月次レポートの作成が完了しました！”, vbInformation
End Sub
‘ 【Private Subの例】このモジュール内でしか使わない内部処理
Private Sub ProcessData(ByVal wsName As String)
Dim lastRow As Long
‘ モジュール内だけで完結する変数を Dim で定義
lastRow = GetLastRow(wsName)
‘ 集計処理（サンプル）
Debug.Print wsName & ” の最終行は ” & lastRow & ” です。”
End Sub
‘ 【Private Functionの例】他のモジュールから隠蔽された計算用関数
Private Function GetLastRow(ByVal wsName As String) As Long
‘ 処理の中で完結するローカル変数
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets(wsName)
‘ 最終行を取得して返す
GetLastRow = ws.Cells(ws.Rows.Count, “A”).End(xlUp.Row)
End Function
このコードが美しい理由
- `RunMonthlyReport` だけが `Public` になっており、外の世界（Excelのボタンなど）から叩けるようになっています。
- `ProcessData` と `GetLastRow` は `Private` になっているため、「他のモジュールから誤って呼び出されるリスク」がゼロです。
- 変数（`targetSheet`, `lastRow`, `ws`）はすべて使う直前に `Dim` で宣言されており、そのプロシージャが終わればメモリから消滅します。スコープが完全に守られています。
—
4. プログラミング初学者へのエール
最初は、「わざわざ `Private` とか `Public` を意識して書くなんて面倒だな……」と感じるかもしれません。すべてをグローバル変数（どこからでも触れる変数）にしておけば、動くだけなら簡単ですからね。
しかし、あなたが作るツールが大きくなり、職場の同僚や上司に使われるようになると、「保守性の高さ（壊れにくさ、直しやすさ）」が何よりも大切になります。
「ここをクリアすれば、Excel VBAの基本はバッチリですよ！」
変数やプロシージャの「居場所」をきちんとコントロールし、お互いの干渉を防ぐこと。このカプセル化の思想こそが、あなたを「マクロが書ける人」から「信頼できる業務自動化エンジニア」へと引き上げてくれる最高の武器になります。
ぜひ、明日からのコードには `Option Explicit` を書き、`Private` の厳格な防壁を張り巡らせてみてください。驚くほどバグのない、美しいVBAライフが待っていますよ！
