【エクセルマクロ】空白セルに色付け：作業高速化のコツ

エクセルマクロで、空白セルに色付けするVBAコードをご紹介します。

このページのマクロコードは、コピペで使えます。
せひ、お試しください。

空白セルに色付け

以下のExcelVBAを実行すると、空白セルに色付けして目立たせます。


Sub 空白を強調()

Dim i As Long
Dim j As Long
Dim LastRow As Long
Dim LastColumn As Long

    '最終行を取得
    LastRow = Cells(Rows.Count, 1).End(xlUp).Row

    '最終列を取得
    LastColumn = Cells(1, Columns.Count).End(xlToLeft).Column

    '行をループ
    For i = 2 To LastRow

        '列をループ
        For j = 2 To LastColumn

            '空欄だったら
            If Cells(i, j) = "" Then

                '背景色に色付け
                Cells(i, j).Interior.Color = 65535

            End If
        Next j
    Next i

End Sub