当前位置: 首页 > 图文教程 > 工具软件 > 办公软件 > 在Excel中轻松查看数据记录

办公软件
Excel:创建常用文档菜单
Excel:快速录入小数
Excel 2000:用Delphi自动生成报表
Excel:记录单帮你准确查看实用表格数据
Excel 2003:轻松自制学生练习测试卷
Excel:精彩实例推荐
Excel:让你的图表更具魅力
教程/办公软件 利用EXCEL做成绩快速统计
利用EXCEL做成绩快速统计—要“详”要“略”随心所欲
Excel:快速输入数据
只有想不到!原来Excel图表还可以这么做!
Excel:多班成绩快速统计
Excel也会“作假”:真正的实现四舍五入
教程/办公软件 EXCEL制作图表的小技巧
教程/办公软件 Excel真正的实现四舍五入
Excel:弹指之间输入特定文本
Excel与IE手牵手,互联网上数据随时随地查
教程/办公软件 让成绩录入更智能--Excel智能成绩录入单
如何用Excel服务器提取“上月”数据
Excel:人民币小写金额转换大写技巧两则

办公软件 中的 在Excel中轻松查看数据记录


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-01   浏览: 41 ::
收藏到网摘: n/a

不知道大家有没有这样的感觉,当你查看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工作表中,若需要查看某行记录,只需单击该行中的任一单元格,此时该行将会自动填充绿色并高亮显示(若需改为其它颜色只需改变代码中相应的数值即可),再次单击该行中任一单元格将取消背景色的填充。另外可同时使多行记录填充背景,以方便查看或对比表格中的数据。

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