基於一列中的內容對整行進行條件格式化

Question

如果列N中的內容包含單詞EMPTY，我有一張表，我想在整行中將字體顏色爲紅色。

例如：

如果N2 =空，則通過AG2
格式A2
.Font.Color = vbRed

我想這樣做在VBA，想法？

目前我可以格式化N2單元格，但無法弄清楚如何在整行上推送它。

Answer 1

只是格式列A：該行的股份，你正在處理：

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 

---

，當然，也可以很容易地被放入一個循環：

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 

---

注意：如果要格式化整行，而不僅是列A：AG，請將.Range("A1:AG1")部分從語句中移出，以便它只是說：

Rows(r).Font.Color = vbRed 

---

根據意見，你不想用VBA，只是條件格式，應用基於的=$N1="EMPTY"在A1單元格公式的條件格式，並複製到無論您希望它適用的單元格如何：