Excel 2010 VBA：设置上一列中单元格引用单元格的颜色

我有填充工作表的macros，并将值复制到网格。 我想添加条件格式的单元格，以便当他们更新时，如果他们变得比上一列更大，他们变成红色，变小他们变成绿色，变成0他们变成灰色。

我的问题是添加条件和引用单元格。

Set newCell = originalEstimateCell.Offset(0, 2 + i) newCell.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, Formula1:="XX" newCell.FormatConditions(1).Interior.Color = RGB(255, 0, 0) 

我的问题是什么取代XX来引用同一行中的前一列，即。 如果我们在单元格C7中，我想引用单元格B7。

谢谢

Answer 1

试试这个

 Sub test() ActiveCell.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _ Formula1:="=" & ActiveCell.Offset(0, -1).Address() ActiveCell.FormatConditions(1).Interior.Color = RGB(255, 0, 0) End Sub 

上面的代码表示当前的单元格值应该大于公式1的值，公式本身是活动单元格之前一列的单元格的地址。 如果你想要格式化一些其他单元格，相对于活动单元格，只需更改偏移方法的参数。

我希望它有帮助。

Answer 2

我的问题是什么取代XX来引用同一行中的前一列，即。 如果我们在单元格C7我想参考单元格C6。

C6将是C7的前一行 ，而不是前一列

尝试

 =INDIRECT("C" & ROW()-1) 

从前一行获取值