この記事で分かること
- 「SubまたはFunctionが定義されていません」エラーが発生する4つの主な原因
- エラーの原因を特定するための具体的なチェックリストと修正手順
- 前任者が退職した後の、パスワードロックや仕様書がないマクロのトラブルシューティング方法
- 将来的なコンパイルエラーを未然に防ぐための、実務で使える開発ルール
「SubまたはFunctionが定義されていません」エラーが発生する主な原因
Excel VBAで開発や実務での運用を行っていると、突然「コンパイルエラー：SubまたはFunctionが定義されていません」というダイアログが表示されることがあります。コンパイルエラーとは、マクロを実行する前（または実行した瞬間）に、VBAのシステムがコード全体の記述ルールをチェックし、「この書き方ではプログラムを解釈できない」と判断したときに発生するエラーです。
このエラーが発生する代表的な原因は、主に以下の4つに分類されます。それぞれの特徴を理解することで、どこを修正すべきかの目星をつけることができます。
| 主な原因 | エラーが発生する具体的な状況 | 主な解決の方向性 |
|---|---|---|
| 1. プロシージャ名や関数名のスペルミス | 呼び出し側と定義側のSubやFunctionの名前、またはVBAの組み込み関数のスペルを打ち間違えている。 | 正しいスペルに修正する。「Option Explicit」を強制して検知する。 |
| 2. 参照設定の不足・バグ | 外部ライブラリ（Outlook、Word、Scripting.Dictionaryなど）を利用するコードにおいて、必要なライブラリへの参照設定が外れている。 | VBEの「ツール」メニューから「参照設定」を確認し、必要な項目にチェックを入れる。 |
| 3. 呼び出し先プロシージャのスコープ（適用範囲）の制限 | 別のモジュールで「Private Sub」や「Private Function」として定義されているプロシージャを呼び出そうとしている。 | 「Private」を「Public」に変更するか、同一モジュール内に処理を移動する。 |
| 4. ワークシート関数の記述ルール誤り | Excelの「VLOOKUP」や「SUM」などのワークシート関数を、VBA内で不適切な形式（直接記述など）で呼び出している。 | 「Application.WorksheetFunction.関数名」の形式に書き換える。 |
特に、長年運用されてきたExcelマクロや、作成した担当者が退職してしまい「ブラックボックス化」しているファイルでは、OfficeのバージョンアップやPCの入れ替えに伴って、これらの原因（特に参照設定のズレやスコープの問題）が突然表面化することがよくあります。
エラーを解消するための具体的な手順とチェックリスト
エラーが発生した際は、慌てずに以下のチェックリストに沿って、1つずつ原因を潰していきましょう。具体的なコード例を交えながら、修正手順を詳しく解説します。
1. スペルミス（タイポ）がないか確認する
最も頻繁に起こるのが、単純なスペルミスです。例えば、以下のようなコードです。
Sub MainProcess()
' 本来は「Call CalculateTax」と呼び出したい
Call CalcurateTax
End Sub
Sub CalculateTax()
MsgBox "計算が完了しました"
End Sub
上記の例では、呼び出し側が「CalcurateTax」となっており、定義側（CalculateTax）と「r」と「l」が間違っています。VBAは「CalcurateTaxなんていうSub（またはFunction）はどこにも定義されていません」と判断し、エラーを出力します。
これを防ぐためには、コードの最上部に「Option Explicit」を記述することを徹底してください。Option Explicit（変数の宣言を強制する設定）が記述されていると、スペルミスのある記述を「未定義の変数」または「未定義のプロシージャ」としてコンパイル時点で厳格に弾いてくれるため、原因の特定が格段に早くなります。
2. ワークシート関数の呼び出し方を確認する
Excelのワークシート関数をVBA内で使用する際、そのまま関数名だけを記述するとこのエラーになります。
' 誤った記述方法（エラーになります）
Sub GetValue()
Dim result As String
result = VLookup(Range("A1"), Range("C1:D10"), 2, False)
End Sub
VBAの標準機能には「VLookup」という関数は存在しないため、上記のように記述すると「VLookupというSubまたはFunctionが定義されていません」と怒られてしまいます。ワークシート関数を使用する場合は、必ず以下のように「Application.WorksheetFunction」を頭に付けて呼び出す必要があります。
' 正しい記述方法
Sub GetValue()
Dim result As String
result = Application.WorksheetFunction.VLookup(Range("A1"), Range("C1:D10"), 2, False)
End Sub
3. 参照設定が正しく行われているか確認する
他のOfficeアプリケーション（OutlookやAccessなど）を操作したり、ファイルシステムを操作する「FileSystemObject」などを使用したりするマクロでは、「参照設定」が必要です。参照設定が外れていると、そのライブラリ特有の関数やオブジェクトを呼び出そうとした際に「定義されていません」のエラーになります。
【確認・修正手順】
1. エラーが発生しているVBAの編集画面（VBE）を開きます。
2. 上部メニューの「ツール」 ＞ 「参照設定」の順にクリックします。
3. ダイアログが表示されたら、項目一覧の中に「参照不可」と頭に書かれたチェックボックスがないか探します。
4. もし「参照不可：Microsoft Outlook xx.x Object Library」などの表示があれば、それが原因です。チェックを外すか、現在利用しているOfficeのバージョンに対応する正しいライブラリにチェックを入れ直してください。
4. プロシージャのスコープ（呼び出し可能な範囲）を確認する
VBAのSubやFunctionには、どのモジュールから呼び出せるかを決める「スコープ」という概念があります。呼び出したいプロシージャが「Private」で定義されている場合、別のモジュールから呼び出すことはできません。
' --- Module1 に記述 ---
Sub Execution()
' Module2の「Private」なプロシージャを呼び出そうとしているためエラーになる
Call MyPrivateSub
End Sub
' --- Module2 に記述 ---
Private Sub MyPrivateSub()
MsgBox "プライベートな処理です"
End Sub
別モジュールから呼び出したい場合は、以下のように「Public」（またはPublicを省略して「Sub」のみ）で定義する必要があります。
' --- Module2 に記述（修正後） ---
Public Sub MyPrivateSub()
MsgBox "パブリックな処理になり、他のモジュールからも呼び出し可能です"
End Sub
前任者退職後にこのエラーに直面した際のトラブルシューティング
実務で最も厄介なのは、「マクロを作った前任の担当者がすでに退職しており、引き継ぎ書もない状態で突然このエラーが発生した」というケースです。長年問題なく動いていたマクロが突然動かなくなる場合、システムの環境変化が引き金になっている可能性が極めて高いです。以下の手順で切り分けを行いましょう。
1. Officeのバージョン変更（32bitから64bitへの移行）を疑う
企業のPC買い替えやIT環境のアップデートにより、Excelが「32bit版」から「64bit版」へ変更されることがあります。この際、WindowsのAPI（外部のDLLファイル）を呼び出す記述（Declareステートメント）が含まれているマクロでは、定義エラーが発生しやすくなります。
例えば、以下のような古いAPI宣言です。
' 32bit版でのみ動作する古い記述（64bit版ではエラーになる）
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
これを64bit環境で動作させるには、「PtrSafe」キーワードを追加し、引数や戻り値の型を適切に変更する必要があります。
' 64bit版に対応させた記述（PtrSafeを追加）
Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
前任者が「とりあえずネットからコピーしてきたコード」をそのまま貼り付けて使っていた場合、このような互換性の問題がPC変更時に一気に噴出します。
2. VBAプロジェクトにパスワードロックがか気になっている場合
エラーが発生したコードの場所（VBE）を確認しようとした際、「プロジェクトは表示できません」というメッセージや、パスワード入力を求められる画面が表示されることがあります。これは前任者がセキュリティや誤操作防止のためにコードを保護した状態です。
パスワードが不明な場合、自力でコードを修正することは極めて困難です。無理に非公式のパスワード解除ツール等を使用すると、ファイル自体が破損し、完全にデータを失うリスクがあります。このような場合は、内部のデータを壊さずにマクロ部分のみを解析・修復できる専門の開発業者に相談することをおすすめします。
3. 一時的なファイル破損やレジストリの問題
Excelファイル自体が破損しかけている場合、VBAが正しくモジュールを読み込めず、「定義されていません」というエラーが誤って表示されることがあります。この場合は、以下の「リビルド（再構築）」手順を試す価値があります。
- 新しい新規のExcelブックを作成する。
- エラーが出る旧ブックから、VBAのコードを一度テキストファイル等にエクスポート（またはコピー＆ペースト）する。
- 新規ブックの標準モジュールにコードを貼り付け直し、シート上のデータもコピーして移行する。
これだけで、不要なゴミデータがクリアされ、エラーが嘘のように消えることがあります。
コンパイルエラーを未然に防ぐためのVBA開発ルール
エラーの発生をその都度修正する「モグラ叩き」のような運用から脱却するためには、マクロ作成時や修正時にいくつかの標準的な開発ルール（ベストプラクティス）を導入することが重要です。これにより、属人化を防ぎ、他の担当者でもメンテナンスしやすいExcelファイルを維持できます。
1. 変数の宣言を強制（Option Explicit）を自動設定する
先述した「Option Explicit」ですが、毎回手動で書き込むのは面倒ですし、書き忘れが発生します。VBE（VBA編集画面）の設定を変更することで、新しいモジュールを作成した際に自動的にこの記述が挿入されるようになります。
【設定手順】
1. VBE（Visual Basic for Applications）を開きます。
2. 上部メニューの「ツール」 ＞ 「オプション」をクリックします。
3. 「編集」タブの中にある「変数の宣言を強制する」にチェックを入れます。
4. 「OK」をクリックして閉じます。
この設定以降に作成されるすべてのモジュールには、自動的に先頭に「Option Explicit」が記述されるため、スペルミスによる「定義されていません」エラーを開発段階でほぼ100%防ぐことができます。
2. プロシージャの命名ルールを統一し、共通化する
似たような処理をいくつも異なるモジュールに記述すると、どれが本物か分からなくなり、呼び出しエラーの原因になります。
処理はできるだけ「共通モジュール」にまとめ、誰が見ても役割が理解できる名前（動詞 + 名詞など）を付けましょう。
| 悪い例（エラーや混乱の原因） | 良い例（可読性が高く管理しやすい） |
|---|---|
Sub CommandButton1_Click()※オブジェクト固有のイベント内に長大な処理をすべて書き殴っている |
Sub ImportCustomerData()※処理ごとに標準モジュールへ切り出し、ボタンからはそれを呼び出すだけにしている |
Function Calc(x, y)※何を計算しているのか、引数の型が何なのか不明瞭 |
Function CalculateTaxAmount(ByVal price As Long) As Long※消費税の計算であることが一目で分かり、データの型も厳格に定義されている |
ルール化されたコードは、万が一エラーが発生した際にもエラー箇所の特定が容易になり、改修コストを大幅に削減できます。
自力での解決が難しい場合の相談先と判断基準
「エラーの解決手順は理解できたけれど、コードの量が多すぎてどこを修正すべきか分からない」「前任者のコードがスパゲッティ状態（複雑に入り組んだ状態）で、一箇所直すと別の場所で新たなエラーが発生する」といった状況に陥ることは珍しくありません。特に業務で毎日使用する基幹的なマクロの場合、無理に自力で修正を試みて業務を止めてしまうリスクは避けるべきです。
以下の状況に当てはまる場合は、外部のVBA開発・システム修復の専門家に相談することを強く推奨します。
- エラー箇所の特定に丸1日以上費やしている： 専門家であれば、原因を数十分〜数時間で特定し、安全に修正可能です。
- マクロにパスワードがかかっていてVBAコードが見られない： 無理にロック解除を試みるとファイル破壊に繋がります。
- ExcelのバージョンアップやPCリプレイスに伴うエラー： 環境依存の複雑な不具合である可能性が高いため、プロの互換性チェックが必要です。
- エラーの修復だけでなく、今後のためにコード全体の整理（リファクタリング）やマニュアル作成を行いたい： 属人化を完全に解消し、業務効率を安定させるための根本的な解決を提案してもらえます。
VBAの不具合改修や、退職した担当者が残した「ブラックボックス化」したマクロの調査・修復を依頼できるサービスを利用することで、日常業務を止めることなく、迅速かつ安全にビジネス環境を復旧させることができます。まずは一度、現状のファイルをそのまま専門家に提示し、開発前診断や見積もりを依頼してみるのが確実な一歩です。
Q：「SubまたはFunctionが定義されていません」と「オブジェクトが必要です」というエラーの違いは何ですか？
「SubまたはFunctionが定義されていません」は、呼び出そうとしたマクロの処理（関数やプロシージャ）そのものの名前が見つからない、またはスペルが間違っている場合に発生します。一方、「オブジェクトが必要です」は、中身の処理ではなく、操作対象となるシートやレンジ（セル）、またはユーザーフォームなどの「物（オブジェクト）」がプログラム上で正しく指定されていない、あるいはインスタンス化（作成）されていない場合に発生するエラーです。対処法が全く異なるため、まずはダイアログに表示された正確なエラーメッセージを確認することが大切です。
Q：参照設定の画面を開いたら「参照不可」とありますが、何をチェックすれば良いか分かりません。
「参照不可」と表示されている行のチェックを外し、OKボタンを押して再度実行してみてください。もしそれで問題なくマクロが動けば、その参照は過去の不要な残骸です。もし別のエラーが出る場合は、利用しているOffice製品（OutlookやWordなど）の、現在PCに入っているバージョンに該当するライブラリ一覧（例：「Microsoft Outlook xx.x Object Library」のxx.xが最新の数値のもの）を探し、新しくチェックを入れてから保存してください。
Q：このエラーが発生したとき、黄色くハイライトされる行がないのはなぜですか？
VBAは、コードを実行する前に全体をチェック（コンパイル）します。実行自体がスタートする前に不整合（スペルミスなど）を見つけた場合、実行時エラー（デバッグモードで黄色く止まる）ではなく、プログラム全体のコンパイルエラーとして警告を出します。このため、黄色いハイライトではなく、エラーメッセージボックスが表示され、OKを押すと問題のある単語（プロシージャ名など）が「青く選択された状態」になります。その青く選択された箇所が、VBAが見つけられなかった未定義の部分です。
Q：前任者が作ったExcelマクロのパスワードが分からず、コードを修正できません。どうすればいいですか？
パスワードで保護されたVBAプロジェクトは、Microsoft公式の機能ではパスワードを入力しない限り解除やコードの閲覧はできません。ネット上には非公式のパスワード解除方法やツールが紹介されていることがありますが、セキュリティリスクやファイルの致命的な破損リスクを伴うため、業務用の重要ファイルで実施することは推奨されません。専門の修復業者であれば、ファイルを安全に保ったままコードを抽出・解析し、新しいセキュリティポリシーに準拠した形式で再構築することが可能です。まずは専門のアウトソーシングサービスへご相談ください。
