1、以下图数据为例，将表中2所在的单元格整行填充黄色，含2的单元格填充为红色。
2、绘制标记按钮，插入一个表单控件（即ActiveX控件），方法可以参考以下链接：
3、在指定宏窗口中，选择”新建“。
4、弹出一个模块，输入代码：
Dim rng As Range
Set rng = Selection
For Each 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 With
Next
5、从VBA界面返回到Excel界面，设置按钮格式，编辑文字为”标记“。
6、按下Ctrl+F组合键，打开查找栏，输入查找内容为2，选择查找全部。
7、按下Ctrl+A选择全部的查找结果，然后点击”标记“按钮，结果如图所示。
PS：按下全选组合键前需保证光标停留在查找结果栏。
