こんにちは。Excel VBA講師の佐藤です。前回に引き続き、実務で遭遇する「動かなくなったマクロ」を修正するための技術を解説していきます。第3回となる今回は、修正プロセスの肝となる「既存コードの解析」と「エラーの原因究明」に焦点を当てます。
1. 既存コードを読み解くためのアプローチ
実務の現場では、自分で書いたコードだけでなく、前任者が残したマクロを修正しなければならない場面が多々あります。他人のコードを読み解く際、いきなり一行目から追おうとするのは非効率です。まずは、マクロが「何を実現しようとしているのか」という大枠を捉えることから始めましょう。
プロフェッショナルな修正作業では、以下のステップでコードの構造を把握します。
まず第一に、変数の宣言を確認してください。Option Explicitが記述されているかどうかは重要です。もし記述されていない場合、変数が型指定なしで定義されている可能性があり、これが後のバグの温床となります。次に、プロシージャの呼び出し関係を確認します。メインとなる処理がどのプロシージャにあり、そこからどのサブプロシージャが呼び出されているのかを整理します。
2. 処理を一時停止させて中身を覗く「デバッグ」の真髄
マクロがエラーで止まる場合、あるいは意図しない結果を返す場合、最も強力な武器になるのが「ブレークポイント」です。
コードの左側のグレーの余白をクリックすると、茶色の丸いマークが表示されます。これがブレークポイントです。プログラムの実行を任意の場所で一時停止させ、その時点での変数の値を一つ一つ確認することができます。
例えば、以下のようなコードがあるとします。
Sub CalculateTotal()
Dim i As Long
Dim total As Double
Dim lastRow As Long
lastRow = Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To lastRow
total = total + Cells(i, 2).Value
Next i
MsgBox “合計金額は” & total & “円です。”
End Sub
このコードで「合計が0になる」「エラーが発生する」といった現象が起きた場合、Forループの直前にブレークポイントを設置します。そして、F8キーを押して一行ずつ実行（ステップ実行）させてみてください。このとき、ローカルウィンドウを表示させておくと、iやtotalの値がどのように変化しているか一目瞭然です。
3. 変数のスコープと寿命を理解する
多くの初心者が陥る罠の一つに、「変数のスコープ（有効範囲）」の誤解があります。
例えば、あるプロシージャ内で定義した変数を、別のプロシージャから参照しようとしてエラーになるケースです。修正を行う際は、変数がどこで宣言されているかを確認してください。
もし、修正対象のコードに以下のような記述があれば注意が必要です。
Dim globalVal As Long ‘ モジュールの先頭で宣言
このグローバル変数は、プロジェクト内のどこからでも書き換えが可能です。もし、複数のプロシージャからこの変数が操作されている場合、意図しないタイミングで値が書き換わっている可能性があります。修正の際は、可能な限り変数のスコープを狭める（プロシージャ内で完結させる）ことが、バグを減らすための鉄則です。
4. エラーハンドリングの欠如を修正する
実務向けのコードには、必ずエラーハンドリングが必要です。予期せぬデータが入力されたとき、マクロが強制終了するのではなく、適切なメッセージを表示して終了するように修正します。
プロフェッショナルなコードの例を以下に挙げます。
Sub ProcessData()
On Error GoTo ErrorHandler
‘ ここにメインの処理を記述
Dim ws As Worksheet
Set ws = Sheets(“データシート”)
‘ 処理内容…
Exit Sub
ErrorHandler:
MsgBox “エラーが発生しました。” & vbCrLf & _
“エラー番号: ” & Err.Number & vbCrLf & _
“エラー内容: ” & Err.Description, vbCritical
End Sub
このように、On Error GoTo を使用することで、エラーが発生した際に強制終了を防ぎ、原因を特定しやすくします。修正作業の際には、既存のコードにこのエラーハンドリングが含まれているかを確認し、もしなければ追加することを強く推奨します。
5. 範囲指定の曖昧さを排除する
「Range(“A1”)」といった書き方は、一見簡単ですが、実務ではリスクを伴います。どのシートを指しているのかが明示されていない場合、アクティブシートが切り替わった瞬間にマクロが別のシートを操作してしまうからです。
修正の際は、必ずシートオブジェクトを明示してください。
‘ 修正前
Range(“A1”).Value = “売上データ”
‘ 修正後
ThisWorkbook.Sheets(“Report”).Range(“A1”).Value = “売上データ”
このように、Worksheetオブジェクトを明示的に指定することで、マクロの動作は格段に安定します。特に大規模なマクロを修正する際は、この「親の指定」が漏れていないかを確認するだけで、多くのトラブルを未然に防ぐことができます。
6. 修正作業の心構え：一度に直そうとしない
最後に、修正作業におけるマインドセットについてお話しします。
多くの人は、エラーを見つけると、一度にすべてのコードを書き直そうとします。しかし、これは非常に危険です。修正箇所が増えれば増えるほど、新たなバグを生み出す可能性が高まります。
「最小単位で修正し、その都度動作確認を行う」。これがプロのやり方です。
1. 修正対象のコードをコピーしてバックアップを取る。
2. 疑わしい箇所を一箇所だけ書き換える。
3. 実行して結果を確認する。
4. 期待通りであれば次の修正へ進む。
この手順を徹底してください。もし途中でうまくいかなくなったら、すぐにバックアップの状態まで戻せるようにしておくことが、修正作業を成功させる鍵です。
7. 最後に：デバッグは「宝探し」である
デバッグ作業を「面倒なこと」と捉えるのではなく、「コードの仕組みを深く理解するチャンス」と捉えてみてください。一行ずつコードを追う中で、元の作成者がどのような意図でそのロジックを組んだのか、どのような工夫を凝らしたのかが見えてくるはずです。
次回の第3回 3/4では、実際に複雑なループ処理を修正する具体的なケーススタディを行います。今回学んだデバッグ手法を駆使して、より堅牢なコードへの書き換えに挑戦していきましょう。
Excel VBAは、正しく扱えばこれ以上ない強力な業務効率化ツールになります。今の苦労は、将来のあなた自身を助けるための投資です。焦らず、一歩ずつ進んでいきましょう。
（次回に続く）
