使用VBA將條件格式應用於一系列單元格

Question

我想知道如何以標題為“適用於”的條件格式訪問該列並輸入我自己的條件。 我已經包含了截圖以供更好的參考。

我在條件格式中添加語法的代碼是，

With Selection
  .FormatConditions.Delete
  .FormatConditions.Add Type:=xlExpression, Formula1:="=" & c.Address & "=TRUE"
  .
  .
  .
End With

我相信應該在那里添加代碼，但我找不到正確的語法。

更新：

我更新了我的代碼，看起來像這樣，

With Range(Cells(c.Row, "B"), Cells(c.Row, "N"))
  .FormatConditions.Delete
  .FormatConditions.Add Type:=xlExpression, Formula1:="=" & c.Address
  .FormatConditions(1).Interior.ColorIndex = 15 'change for other color when ticked
End With

這基本上會使特定范圍的行與我放置復選框的位置相關，其背景顏色會發生變化。 復選框位置由c.Address表示，其中'c'包含我選中放置復選框的單元格的位置。

Answer 1

你需要做這樣的事情（ Range("A25")正是你要找到的）：

With Range("A25")
        .FormatConditions.Delete
        .FormatConditions.Add Type:=xlExpression, _
            Formula1:="=" & c.Address 
        '.
        '.
        '.
End With

並且不需要寫"=" & c.Address & "=TRUE" ，您只需使用"=" & c.Address 。

Answer 2

“適用於”是執行With塊的選擇中固有的。