在Excel表中完成数据输入后，有时需要查找出单元格区域中某些特殊数值的单元格，这种操作可以通过Excel的“查找”功能来实现，同时也可以通过编写VBA程序来实现。本文实现查找Excel单元格区域中包含特定数值的单元格的方法。
1、启动Excel并打开一个成绩表，选择需要查询的单元格区域，如图1所示。下面通过编程实现将选择单元格区域中成绩低于72的单元格用红色标示出来。
图1 选择单元格区域
2、启动Visual Basic编辑器，在工程资源管理器中插入一个模块，在该模块的“代码”窗口中输入如下程序代码：
Sub GetAllCells()
Dim cell As Range
Const RedIndex=3
Application.ScreenUpdating=False '禁止屏幕更新
For Each cell In Selection
If cell.Value<72 Then cell.Interior.ColorIndex=RedIndex
Next cell
Application.ScreenUpdating=True '恢复屏幕更新
End Sub
提示
在这段程序代码中，使用For Each……In结构遍历选择的单元格区域，判断该区域中单元格的值是否小于72，如果小于，则为单元格填充红色。
3、按F5键运行程序，选择单元格区域中符合条件的单元格被填充红色，如图2所示。
图2 程序运行结果
