條件格式化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