根据单元格内容自动显示Excel颜色单元格

时间:2013-10-08 17:19:24

标签: excel excel-vba colors customization vba

在Nutshell中,我想要做的就是当你单击条件格式化按钮时可以做的事情,而不是更高级。

想象一下,您有一个具有不同值的列,例如:

value1
value1
value2
value3
value3
value3
value1

等。

我想要做的是为每个不同的值X分配不同的颜色。 我知道通过条件格式化按钮很容易做到,但是说我不知道​​我总共有多少个值......可能是valueX到valueY或者是valueZ。所以,由于我不知道列中有多少不同的值,我希望能够找到它并为相应的每个值分配一个随机颜色。

我想过使用RGB值并为每个值增加RGB数字 valueX = FFFF00 valueY = FF0000 valuez = 000000 或类似的东西,

但这需要VB脚本或excel正在使用的任何脚本语言,这远远超出了我对Excel的个人知识。

有人能指出我正确的方向吗?在脚本中难以做到吗?

非常感谢

1 个答案:

答案 0 :(得分:1)

我使用VBA做这样的事情,根据数字值有条件地为我选择的单元格着色。

最简单的方法是:

Sub colorValues()

    For Each cell in Selection
        If cell.Value = "Value1" Then
            cell.Interior.Color = 65535
        ElseIf cell.Value = "Value2" Then
            cell.Interior.Color = 255
        ElseIf cell.Value = "Value3" Then
            cell.Interior.Color = 13762516
       End If
    Next cell

End Sub

非常基本,但您可以扩展它并添加多种颜色。数值与颜色有关,我只选择了随机数。

此示例假定固定数量的值。如果你想为那些稍微难点的细胞动态着色。您必须在选择中创建唯一值的数组,并为每个对应的值指定颜色。

相关问题