着色具有相同价值的细胞

时间:2017-09-08 10:47:48

标签: vba

如果单元格的值与列E中的单元格匹配,我需要在A列中将单元格颜色设为绿色。单元格从第二行开始。值未排序,因此它们不会在行中匹配。我需要检查A列中的每个单元格,并将它们与E列中的每个单元格进行比较。 请帮忙。

1 个答案:

答案 0 :(得分:1)

请尝试以下代码:

For i = 2 To 100
    If ((Worksheets("Table1").Range("A" & i).Value <> "") And (Worksheets("Table1").Range("A" & i).Value = Worksheets("Table1").Range("E" & i).Value)) Then
        Range("A" & i).Interior.ColorIndex = 50
    Else
        Range("A" & i).Interior.ColorIndex = 2
    End If 
Next i
  • 只需确保在代码的第二行插入表格的名称
  • 您还可以将数字100更改为要比较的行数。