如何基于Excel中的值格式化单元格

时间:2018-01-07 11:57:31

标签: excel excel-vba vba

我有这个逻辑来为选定的单元格区域赋予单元格颜色值。

If value > 75
  cell color = BLUE
Else if value > 50
  cell color = RED
Else
  cell color = BLACK

如何在Excel中使用此逻辑根据其值对单元格进行着色?

1 个答案:

答案 0 :(得分:2)

将其写入适当的工作表模块( + Alt + F11

<强>更新

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    If Target.Value > 75 Then
        Target.Interior.Color = 12611584
    ElseIf Target.Value > 50 Then
        Target.Interior.Color = 255
    Else
        Target.Interior.Color = 0
    End If
    Application.EnableEvents = True
End Sub

条件格式化

  1. 第一步 Step1
  2. 第二步 Step2
  3. 解释

    蓝色

    • 范围:渴望。例如,在Excel 2007中使用整个Sheet的范围是=$1:$1048576
    • 公式:使用范围的第一个单元格。 (以上示例为A1):=A1>75

    红色

    • 范围:渴望。例如,在Excel 2007中使用整个Sheet的范围是=$1:$1048576
    • 公式:使用范围的第一个单元格。 (以上示例为A1):=A1>50

    黑色

    • 范围:渴望。例如,在Excel 2007中使用整个Sheet的范围是=$1:$1048576
    • 公式:使用范围的第一个单元格。 (以上示例为A1):=AND(NOT(A1>50),ISNUMBER(A1))