条件格式化VBA不同单元格作为条件

Question

我想将条件格式添加到一个单元格，但条件的值是另一个单元格。

条件应该进入此单元格： Cells(x, cellcounter)

If Cells(x, cellcounter) > 0 then Cells(y, cellcounter) color RGB(153, 199, 112)

这是我想出的，但给我一个错误。 正确的语法是什么？

Cells(cell_quote_paid, cellcounter).FormatConditions.Add(Cells(cell_pending, cellcounter), xlGreater, "=0").Interior.Color = RGB(153, 199, 112)

谢谢！

Answer 1

在Excel 2010中，不需要VBA。

1. 将Excel光标放在单元格（y，单元格计数器）中，然后单击“首页”功能区的“样式”部分中的[条件格式]-[新规则...]
2. 点击“ 使用公式来确定要格式化的单元格 ”
3. 将光标放在“在公式正确的位置设置格式值”字段中
4. 单击单元格（x，单元格计数器）...，它将显示例如= $ A $ 1（即，满足您条件的单元格的引用）
5. 在公式中添加“> 0”并选择格式

您可以使用[条件格式设置]-[管理规则...]将相同的规则应用于多个单元格，因此，如果条件单元格从0变为1，则所有单元格都将变为红色。

若要在VBA中执行相同的操作，请使用以下方法和属性：

{target range}.FormatConditions.Add Type:=xlExpression, Formula1:="=$A$1>0"
{target range}.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
{target range}.FormatConditions(1).Font.Color = RGB(153, 199, 112)
{target range}.FormatConditions(1).StopIfTrue = False