Excel实现一键颜色标记所查数据及其所在的行/列

1、以下图数据为例，将表中2所在的单元格整行填充黄色，含2的单元格填充为红色。

2、绘制标记按钮，插入一个表单控件（即ActiveX控件），方法可以参考以下链接：

3、在指定宏窗口中，选择”新建“。

4、弹出一个模块，输入代码：Dim rng As RangeSet rng = Sele罕铞泱殳ctionFor E锾攒揉敫ach rng In rng.Cells rng.Select Selection.EntireRow.Select With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .Color = 65535 .TintAndShade = 0 .PatternTintAndShade = 0 End With rng.Select With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .Color = 255 .TintAndShade = 0 .PatternTintAndShade = 0 End WithNext

5、从VBA界面返回到Excel界面，设置按钮格式，编辑文字为”标记“。

6、按下Ctrl+F组合键，打开查找栏，输入查找内容为2，选择查找全部。

7、按下Ctrl+A选择全部的查找结果，然后点击”标记“按钮，结果如图所示。PS：按下全选组合键前需保证光标停留在查找结果栏。