【VBA】ColorIndex参照表

木心鱼儿

于 2024-01-17 15:55:17 发布

阅读量1.7k

点赞数 13

文章标签： excel

本文链接：https://blog.csdn.net/weixin_43957681/article/details/135652599

版权

在VBA编程中，当使用 ColorIndex 设置单元格或范围的颜色时，不知道各个ColorIndex对应的颜色时，可根据这个表格进行参照，找到想要的颜色。

示例代码：

Sub AddBackgroundColorWithColorIndex()
    ' 引用要操作的单元格范围
    Dim rng As Range
    Set rng = Range("A1:B2") ' 替换为实际的单元格范围引用

    ' 设置背景色为 ColorIndex = 3 的颜色
    rng.Interior.ColorIndex = 3
End Sub

ColorIndex	对应背景色	ColorIndex	对应背景色
1		29
2		30
3		31
4		32
5		33
6		34
7		35
8		36
9		37
10		38
11		39
12		40
13		41
14		42
15		43
16		44
17		45
18		46
19		47
20		48
21		49
22		50
23		51
24		52
25		53
26		54
27		55
28		56