excel VBA对特定背景颜色的单元格进行赋值
2016-11-22 16:06
441 查看
Sub 宏1() ' ' 宏1 宏 ' '先选中要替换的区域,将特定背景颜色的单元格都赋值为"√" ' Dim lColor As Long ' 'lColor = InteriorColor(Range("G2"))' lColor = 10213316 'Worksheets("sheet1").Range("B1").Value = lColor For Each rCell In Selection.Cells 'Worksheets("sheet1").Range("C1").Value = rCell.Interior.Color If rCell.Interior.Color = lColor Then rCell.Value = "√" End If Next End Sub '获取单元格的背景颜色 Function InteriorColor(CellColor As Range) Application.Volatile InteriorColor = CellColor.Interior.Color End Function
相关文章推荐
- EXCEL-VBA:根据单元格字体、背景颜色计数、求和
- EXCEL按单元格颜色进行筛选 VBA代码 FOR EXCEL2003 (原创)
- excel中根据单元格背景颜色进行数据筛选(excel2003实现方法)
- 使用C#和Excel进行报表开发(五)-操作单元格边框和颜色
- vba为每行中最小值单元格添加背景颜色
- VBA 第8课 Excel单元格的颜色,格式的设置
- POI之Excel自定义单元格背景颜色
- 使用C#和Excel进行报表开发(五)-操作单元格边框和颜色
- 使用C#和Excel进行报表开发(五)-操作单元格边框和颜色
- 黄聪:phpexcel中文教程-设置表格字体颜色背景样式、数据格式、对齐方式、添加图片、批注、文字块、合并拆分单元格、单元格密码保护
- NPOI Excel 单元格背景颜色对照表
- 使用C#和Excel进行报表开发(五)-操作单元格边框和颜色
- Excel编写VBA判断2个值是否相等,然后改变单元格颜色
- Excel 单元格按照条件改变背景颜色
- vba为每行中最小值单元格添加背景颜色
- 使用C#和Excel进行报表开发(五)-操作单元格边框和颜色
- 使用C#和Excel进行报表开发(五)-操作单元格边框和颜色
- 使用C#和Excel进行报表开发(五)-操作单元格边框和颜色
- 使用C#和Excel进行报表开发(五)-操作单元格边框和颜色
- 转载 NPOI Excel 单元格背景颜色对照表