启用VBA编辑器可以实现。
1、全选工作表
2、格式→条件格式,把单元格数值改为“公式”,输入公式 =CELL("row")=ROW(),
然后点击窗口上面的格式。在弹出的窗口中点击“图案”,选红色。确定。
3、按ALT +
F11组合键,进入VBA编辑器。
4、在左上角的工程资源管理器里面找到 ThisWorkBook,双击,在右侧的代码区粘贴代码:
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object,
ByVal Target As Range)
Application.ScreenUpdating = True
End
Sub
5、关闭VBA编辑器。
6、保存EXCEL文件。以后点击或查找到哪个行,此行就会以红色显示。
Excel2007中操作原理类似,但有一点点差别,现附图详细表述:
图01:打开工作表,点击全选此表,如上图十字鼠标那儿。
图02:点击“条件格式”下的“管理规则...”命令项。
图03:弹出条件格式规则管理器对话框,点击“新建规则...”按钮(此时互对话框下面的规则列表是空的)
图04:在弹出的新建格式规则对话框中,先选中“使用公式确定要设置格式的单元格”项(如上图蓝色那一项),并在下方的“为符合此公式的值设置格式(O):”框中输入 =CELL("row")=ROW()
图05:在上述对话框中点击“格式...”按钮,设置需要的醒目格式,例如设置颜色为红色,并且加粗,设置好后确定返回
图06:上图就是设置好格式返回看到的规则列表,注意这条规则后面的复选框是打上勾的,代表有效。点击确定退出。
图07:返回到工作表窗口,按下ALT+F11组合键,调出VBA编辑器,如上图,双击ThisWorkbook项,在右侧的代码区中粘贴上如图代码(与2003版本中同,可以从上面蓝色的字那段代码拷贝),关闭VBA编辑器即自动保存
图08:再次返回到工作表窗口,点击保存按钮,将上述操作保存好,然后就可以看到将鼠标点击任意行,该行就会变成上面所设置的醒目格式(加粗,红字)。可以试一下查找功能。
图09:例如查找姓名包含有“林凤”的记录。
图10:光标即自动定位到查找到的记录上,并且有醒目格式。