在excel里面用vba能给单元格填充自定义的颜色吗?

发布网友发布时间：2022-04-24 16:50

共3个回答

热心网友时间：2023-10-23 19:14

楼主：你好，对于你这个问题有个前提条件：

如果你的Excel版本是2003版，那么你只能用系统预设的56色。用VBA代码实现的其他填充色会被转换为和这56色最接近的一种。

如果你的Excel版本是2007及以上，那么单元格填充色几乎不受*，你完全可以通过单元格填充的命令实现自定义颜色填充，支持RGB、HSL两种模式，无需借助VBA。

如果使用VBA,代码如下:

Sub test()
    '将A1单元格填充为红色,RGB(红，绿，蓝) ,红、绿、蓝取值在0~255，可设置不同值获得不同颜色。
    Range("A1").Interior.Color = RGB(255, 0, 0)  '填充为红色

    '如果想去掉填充色，用这句
    Range("A1").Interior.Pattern = xlnoe
End Sub

热心网友时间：2023-10-23 19:14

Sub main()
Range("a1:b10").Interior.Color = RGB(255, 0, 0)
End Sub

热心网友时间：2023-10-23 19:15

range("a1").Interior.Color=RGB(100,15,15)