基于公式的Excel 2007/2010色标条件格式

| 假设我具有以下表结构(A1:C3)
     A   B   C
1    H1  H2  H3
2    1   1   3
3    4   5   4
如何在以下条件下应用条件格式: 仅标题单元格(H1,H2,H3)被着色 配色方案为2或3色标 用于计算颜色的值应为A2 / A3,B2 / B3,C2 / C3(范围为0-1) 注意:我不是要寻找VBA解决方案,因为我可以自己做,但是如果您有一些疯狂的1衬板,请告诉:) 注意:我不想应用很多规则,例如
if x<0.3 red
if 0.3<x<0.6 orange
等。 有没有干净的解决方案? 是否可以根据公式的值应用3色标?
已邀请:
我认为您正在寻找的东西很不幸,但不幸的是不存在。我只是看到两个选项。 您可以使用三个条件进行条件格式设置,如果要使用默认单元格颜色作为三个条件之一,则可以只设置两个条件(例如,公式Is =(A2 / A3)<0.3,公式Is =(A2 / A3)< 0.6,或者您希望阈值达到的任何数值)。您可以在Excel中的一个标头单元格上手动应用此格式化,然后将其复制到所有标头中。或通过VBA进行应用。 或者,您可以在VBA中为页眉着色,然后在工作表上放置一个按钮,调用该代码以更新颜色。
With Range(\"A1\")
    For i = 1 To 3
        colorscale = .Cells(2, i).Value / .Cells(3, i).Value
        .Cells(1, i).Interior.Color = _
            RGB(colorscale * 255, colorscale * 255, _
            colorscale * 255) \' for example. Or pick your colors otherwise.
    Next i
End With
在我看来,第一个选项(条件格式)更适合,因为它会根据单元格值自动更新颜色。不过,我不得不承认,我不太明白为什么您要寻找比这更“清洁”的东西,因为它实际上是一个非常简单的解决方案。两个条件构成“很多规则”吗?一点也不用英语...
这是让·弗朗索瓦·科贝特(Jean-FrançoisCorbett)的代码改编而成,该代码采用了红黄绿渐变色:
With Range(\"A1\")
    For i = 1 To 3
        ColorScale = .Cells(2, i).Value / .Cells(3, i).Value
        If ColorScale < 0.5 Then
            red = 255
            green = ColorScale * 2 * 255
        Else
            red = (1 - ColorScale) * 2 * 255
            green = 255
        End If

        .Cells(1, i).Interior.Color = RGB(red, green, 0)
    Next i
End With

要回复问题请先登录注册