ExcelVBA コード実行してもエラー表示なしで動かない｜動作させる方法

Excel VBA  コードを実行しても エラーは出ないのに動かない 原因を理解し、正しく動作させる方法。使い方や注意点など、サンプルコードをもとに具体的に解説します。

Excel VBA エラー表示なしで動かない｜シーン

Excel VBA エラー表示なしで動かない｜サンプルコード

マクロが実行されていない

Option Explicit

Sub TestMacro()
    MsgBox "動作確認" ' 実行されるとポップアップが出る
End Sub

セル範囲やシートの指定ミス

「Sheet1」を明示的に指定する

Option Explicit

Sub SetValue()
    ' ★ワークシート名を指定
    Sheets("Sheet1").Range("A1").Value = "成功"
End Sub

条件分岐（If, For）が誤っている

Option Explicit

Sub CheckCondition()
    Dim num As Integer
    num = 10
    If num > 100 Then ' num = 10なのでここは実行されない
        MsgBox "成功"
    End If
End Sub

Debug.Print num を入れて、値を確認する

画面更新が無効化されている

Option Explicit

Sub UpdateScreen()
    Application.ScreenUpdating = False ' 画面更新オフ
    Range("A1").Value = "成功"
    Application.ScreenUpdating = True ' 画面更新オン
End Sub

コードが途中で止まっている（Exit Sub, Exit For）

Option Explicit

Sub StopEarly()
    MsgBox "処理開始"
    Exit Sub ' ここで止まるため、次の処理が実行されない
    MsgBox "ここには来ない"
End Sub

「Exit Sub」が不要なら削除する

ループがスキップされる

Option Explicit

Sub SkipLoop()
    Dim rng As Range
    Dim cell As Variant
    Set rng = Range("B1:B10").SpecialCells(xlCellTypeConstants) ' 値のあるセルのみ
    For Each cell In rng
        cell.Interior.Color = RGB(255, 0, 0) ' 赤にする
    Next cell
End Sub

「rng」が Nothing でないか MsgBox rng.Address で確認

Excel VBA エラー表示なしで動かない｜まとめ