【www.hzclsc.cn--办公】

不知道大家有没有这样的感觉，当你查看Excel数据表中某行记录时，由于数据表中的字段较多，需要拖动水平滚动条才能将整个表格的内容看完，这样很容易“看走眼”，不小心就会将上面一行或下面一行的内容错看成当前记录的数据。这样的数据交给领导，可是要挨批噢，其实通过下面的几行VBA代码，你就可以轻轻松松地查看记录了，操作步骤如下：



　　打开某工作表(假设为“Sheet1”)，单击“工具”菜单中的“宏”，选择“Visual Basic编辑器”命令，双击左侧窗口中对应的工作表标签名称，在弹出的代码窗口中输入如下VBA代码：



　　Private Sub WorksheetSelectionChange(ByVal Target As Range)



　　　If Target.EntireRow.Interior.ColorIndex10 Then



　　　Target.EntireRow.Interior.ColorIndex = 10Else



　　　Target.EntireRow.Interior.ColorIndex = 0End IfEnd Sub



　　关闭代码窗口回到Excel工作表中，若需要查看某行记录，只需单击该行中的任一单元格，此时该行将会自动填充绿色并高亮显示(若需改为其它颜色只需改变代码中相应的数值即可)，再次单击该行中任一单元格将取消背景色的填充。另外可同时使多行记录填充背景，以方便查看或对比表格中的数据。



　　编辑提示：虽然单击记录前的行号可选定整行记录，相对之下，本文提供的方法在日常办公中更为方便和快捷。

本文来源：http://www.hzclsc.cn/ruanjianzixun/16582.html