条件格式的宏

时间:2017-05-31 07:00:49

标签: vba excel-vba excel-2013 excel

任何人都可以告诉宏有条件格式化,比如我有一个包含2个工作表的excel,我需要格式化M列中的数据,这是以%为单位,在另一个工作表中给出的标准说Target(E,F列) 。

EG。如果M5的值小于E3,则M5的背景颜色应该是红色,如果它大于F3则M5应该是绿色,如果M5的值在E3和E3之间。 F3那么M5的颜色应该是琥珀色。

请帮助解决这个问题。

1 个答案:

答案 0 :(得分:0)

如果E3中的Sheet2为50且F3为60,

enter image description here

Sub highlightcol()
Dim i As Long
For i = 1 To Cells(Rows.Count, "M").End(xlUp).Row
    If Cells(i, "M") < Sheets("Sheet2").Range("E3") Then
        Cells(i, "M").Interior.Color = vbRed
    ElseIf Cells(i, "M") > Sheets("Sheet2").Range("F3") Then
        Cells(i, "M").Interior.Color = vbGreen
    Else
        Cells(i, "M").Interior.Color = vbYellow
    End If
Next i
End Sub

此简单代码根据条件突出显示Column M中的所有值。