使用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块的选择中固有的。