基于一列中的内容对整个行进行条件格式设置

Question

I have a table that I want to color the font red in an entire row IF the contents in column N contains the word EMPTY.

For example:

if N2=EMPTY then
Format A2 through AG2
.Font.Color = vbRed

I would like to do this in VBA, thoughts?

Currently I can format the N2 cell but can't figure out how to push this across the entire row.

Answer 1

Just format columns A:AG of the row that you are processing:

Sub test()
    Dim r As Long
    r = 2
    If Cells(r, "N").Value = "EMPTY" Then
        Rows(r).Range("A1:AG1").Font.Color = vbRed
    End If
End Sub

---

And, of course, that could be easily be placed into a loop:

Sub test()
    Dim r As Long
    For r = 2 To 100
        If Cells(r, "N").Value = "EMPTY" Then
            Rows(r).Range("A1:AG1").Font.Color = vbRed
        End If
    Next
End Sub

---

Note: If you wanted to format the entire row, and not just columns A:AG, leave the .Range("A1:AG1") part out of the statement, so that it just says:

Rows(r).Font.Color = vbRed

---

Based on comments that you don't want to use VBA, just conditional formatting, apply a conditional format based on a formula of =$N1="EMPTY" in cell A1, and copy that to whatever cells you want it to apply to: