背景颜色基于与细胞的差异

时间:2016-04-05 14:54:58

标签: excel vba excel-vba formatting conditional

我正在尝试创建一个VBA代码,允许我根据它与左边的neigbouring单元格的不同,为单元格分配背景颜色。

请允许我解释一下: http://imgur.com/UUfaFRA

当您查看上图时,您可以看到:

  • C3为红色,因为它的值高于B3
  • C4没有颜色,因为它的值等于B4
  • C5为绿色,因为它的值低于B5

我试图把它放到VBA代码中,但没有成功:

Sheets("x").Range("C3").FormulaR1C1 =
"=IF(RC>RC[-1],Interior.ColorIndex = 3,IF(RC<RC[-1,Interior.ColorIndex= 4))"

另一种尝试是记录IF功能:

If Sheets("x").Range("C3") > Sheets("x").Range("D3") Then
Sheets("x").Range("C3").Interior.ColorIndex = 3

我希望有人可以指出我正确的方向,因为我(显然)没有VBA大师。

1 个答案:

答案 0 :(得分:0)

If Sheets("x").Range("C3") > Sheets("x").Range("D3") Then
Sheets("x").Range("C3").Interior.ColorIndex = 3

这段代码有效。有些范围问题最初会导致此代码失败。

感谢您的支持!