有没有一种方法可以比较单元格值,然后根据该值对单元格进行着色

时间:2019-07-08 09:33:09

标签: excel vba

我正在尝试比较两列数据(G列和N列)-两者都在同一工作表中。

我正试图让我的代码执行以下操作:

Compare the value of N4 with G4.
If N4 is < G4, color red, 
If N4 = G4, color yellow,
If N4 > G4, color green. 
Repeat this for all active cells in those columns. 

自从我使用Macros以来已经有一段时间了,我不知道如何将它们组合在一起。下面的代码是我所在的位置,但这仅在N列中的值等于“ 7”的情况下才对它进行着色。这就是我正在努力解决的问题-如何通过将其与G列进行比较来改变颜色?如果有人可以帮助将其组合在一起,将不胜感激!

我尝试过条件格式设置,但是我希望范围添加更多颜色选项,并且如果N的值在G的%以内,则可以进行编辑。

Sub ColourCode()

lRow = Range("N" & Rows.Count).End(xlUp).Row
Set MR = Range("N4:N" & lRow)
For Each cell In MR
If cell.Value = 7 Then cell.Interior.ColorIndex = 10
Next
End Sub

Formula可以根据固定值很好地进行着色-不会与G列进行比较

1 个答案:

答案 0 :(得分:0)

如果cell.Value是N列Range("N4:N" & lRow)中的一个单元格,则需要偏移-7列才能从cell移到G列。

If cell.Value = cell.Offset(ColumnOffset:=-7).Value Then