在使用VBA设置单元格背景色时,最常用的方法时interior.colorindex,当我们需要表示一些重点单元格时,除了背景色以外,可以使用interior.pattern方法,在单元格的背景上再添加图案。
#一、interior.colorindex方法
1、新建EXCEL.xlsm
2、输入一下代码
Sub colorShow()
Dim i As Integer
For i = 1 To 20
Cells(i + 1, 1).Value = i
Cells(i + 1, 2).Interior.ColorIndex = i
Next i
For i = 21 To 40
Cells(i - 20 + 1, 4).Value = i
Cells(i - 20 + 1, 5).Interior.ColorIndex = i
Next i
For i = 41 To 56
Cells(i - 40 + 1, 7).Value = i
Cells(i - 40 + 1, 8).Interior.ColorIndex = i
Next i
End Sub
3、运行后保存。

#二、intrior.pattern方法
1、新建EXCEL.xlsm
2、复制一下代码
Sub patternShow()
Dim i As Integer
For i = 1 To 17
Range("A" & i + 1).value = i
Range("B" & i + 1).Interior.Pattern = i
Next i
End Sub
3、保存运行。

本文介绍了如何使用VBA在Excel中设置单元格背景色,包括使用ColorIndex方法按数字填充颜色以及Interior.Pattern方法添加图案,通过两个示例展示了这两种功能的应用。
2万+

被折叠的 条评论
为什么被折叠?



