[[20180317171218]]　『データの塗りつぶし』（渥見）　ページの最後に飛ぶ

『データの塗りつぶし』（渥見）

お世話になります。
毎月エクセルで一覧表を作成し作業の完了確認をしています。
そこで完了済と未完を見分けやすくするために終わっていない部分のセルに塗りつぶしをしているのですが、それを自動化したいと思っています。
データの内容は
A～N列に作成されていて行数は毎月変動しています。チェックしたい項目はN3から最終入力された行までとしたいのですが、考えたコードでは例えばN100までリストは作成されているのですがN94に入力するとマクロを実行してもN94までしか範囲が指定されず思うように行きません。
なので現在はリストを作成したら最終セルを確認し、
Sub 空欄セルに色を付ける()

    Dim 空欄 As Range
    For Each 空欄 In Range("N3:N100")
        If 空欄.Value = "" Then
            空欄.Interior.ColorIndex = 36
        End If
    Next
End Sub
といった形でコードを実行しています。
現在のリストは格子罫線を掛けているので、N3から格子の最終までを対象にして未入力部分に色付けを行うコードがあれば教えて頂きたいです。

＜使用 Excel：Excel2016、使用 OS：Windows10 ＞

条件付き書式でできませんか
こんな感じで

=And(A3<>"",N3="")

（マナ） 2018/03/17(土) 18:58

コメント返信：

[ 一覧(最新更新順) ]

[[20180317171218]] 『データの塗りつぶし』（渥見） ページの最後に飛ぶ

[[20180317171218]]　『データの塗りつぶし』（渥見）　ページの最後に飛ぶ