VBAの「インデックスが有効範囲にありません（エラー9）」の原因と解決策を徹底解説

Visual Basic for Applications（VBA）は、Microsoftが開発したVisual Basicプログラミング言語の実装です。VBAを活用することで、ユーザー定義関数（UDF）の作成、業務タスクの自動化、DLL経由でのWinAPIへのアクセスなどが可能になります。しかし最近、特定のコマンドを実行しようとした際に「インデックスが有効範囲にありません（Subscript Out of Range、エラー9）」というメッセージが表示され、処理が完了できないという報告が多数寄せられています。

VBAで「添字が範囲外」エラーが発生する主な原因

多くのユーザーからの報告を受けて、私たちはこの問題を詳しく調査し、完全に解決するための一連の対策をまとめました。あわせて、エラーが発生する背景となる原因も特定し、以下に整理しています。

• 存在しない要素の参照： コマンド内で、実際には存在しない要素を参照しているケースがあります。添字が取り得る範囲を超えているか、あるいはその時点で配列に次元が割り当てられていない可能性があります。
• 要素数の未定義： コード内で配列の要素数を定義し忘れている可能性があります。配列の要素数は「Dim」または「ReDim」ステートメントを使って明示的に宣言することが重要です。
• 誤ったコレクションメンバーの指定： 存在しないコレクションメンバーを参照している場合があります。コレクションへの参照が不正だと、このエラーが発生します。
• 省略形の記述： 添字の省略形を使った結果、無効な要素が暗黙的に指定されてしまった可能性があります。有効なキー名を使用することが重要です。

ここまでで問題の性質について基本的な理解が得られたので、次に具体的な解決策を見ていきましょう。競合や不具合を避けるため、以下の順番どおりに実施することをお勧めします。

解決策1：配列の内容を確認する

配列要素に誤った値を定義している可能性があります。まず、配列要素に設定した値を再確認し、正しいものであるかどうかをチェックしましょう。さらに、配列の宣言部分を見直し、上限値と下限値が適切かどうかを検証してください。配列のサイズを再定義（Redim）した場合は、LBound関数とUBound関数を使ってアクセス範囲を制御すると安全です。インデックスに変数を使用している場合は、変数名のスペルミスがないかも必ず確認してください。

解決策2：配列の要素数を明示的に指定する

コード内で配列の要素数を定義していないことが原因で、エラーが発生しているケースがあります。DimまたはReDimステートメントを使用して、配列の要素数を明示的に指定するようにしましょう。

解決策3：ループ構文を「For Each…Next」に変更する

このエラーは、誤ったコレクションメンバーや存在しないメンバーを指定した際によく発生します。インデックス番号で要素を直接指定する代わりに、「For Each…Next」構文を使ってコレクションを反復処理する方法が推奨されます。これにより、存在しないインデックスへのアクセスを防ぐことができます。

解決策4：キー名とインデックスを見直す

添字の省略形を使用したことで、無効な要素が指定されてしまった可能性があります。コレクションにアクセスする際は、有効なキー名とインデックスを正しく指定するようにしてください。