EXCEL中如何用VBA将某个单元格填充颜色(高亮显示)?

来源：本站整理作者：梦在深巷时间：2016-08-05 22:37:13

方法一
如你的数据在A列，代码如下。
sub aa ()
for x =1 to range("A65536").end(xlup).row'建立循环
if cells(x,1)=6 then'判断单元格值
cells(x,1).interior.colorIndex = 3'单元格值等于6时，该单元格填充红色
end if
next x
end sub
方法二：
简单一点，假设数据在A1~A10，取6这个值
sub xxx()
for i=1 to 10
if cells(i,1)=6 then cells(i,1).interior.colorindex=3
next i
end sub
方法三：
如果你的Excel版本是2003版，那么你只能用系统预设的56色。用VBA代码实现的其他填充色会被转换为和这56色最接近的一种。
如果你的Excel版本是2007及以上，那么单元格填充色几乎不受限制，你完全可以通过单元格填充的命令实现自定义颜色填充，支持RGB、HSL两种模式，无需借助VBA。

如果使用VBA,代码如下:
EXCEL中如何用VBA将某个单元格填充颜色(高亮显示)?

本周热门

1

在用EXCEL计算标准偏差的时候该用STDEV STDEVA STDEVP哪一种? 2016/07/22
2

Excel常用函数公式大全 2013/08/05
3

EXCEL中函数VLOOKUP与函数LOOKUP的区别 2016/08/15
4

EXCEL表中#N/A是什么意思?#N/A是什么? 2015/05/26
5

为什么在excel表格里打数字总是变成缩写的形式? 2016/07/21
6

怎么在EXCEL表格中的数字前统一加一个字母? 2016/08/08
7

Excel将文本转换为数字的4种方法 2011/08/27
8

excel里如何绘制多条折线图? 2016/07/20

本月热门

1

在用EXCEL计算标准偏差的时候该用STDEV STDEVA STDEVP哪一种? 2016/07/22
2

Excel常用函数公式大全 2013/08/05
3

excel求和出现#value是什么原因? 2016/08/18
4

Excel怎么设置英文首字母大写 2020/08/24
5

Excel怎么提取时间中的小时 2020/08/27
6

excel表格中隔行选取的三种方法 2016/12/03
7

Excel中将15位身份证号转换为18位 2014/07/08
8

Excel怎么做表格 2013/03/06
9

Excel中怎么在散点图中插入直线 2016/08/08
10

excel表格的水平(分类)轴标签灰色不可编辑是什么原因? 2016/07/24

EXCEL中如何用VBA将某个单元格填充颜色(高亮显示)?

相关推荐

本周热门

本月热门