用醒目颜色高亮显示选中单元格所在的整行或是整列

整理文档很辛苦,赏杯茶钱您下走!

免费阅读已结束,点击下载阅读编辑剩下 ...

阅读已结束,您可以下载文档离线阅读编辑

资源描述

以下为仅依靠VBA代码方式实现高亮显示:操作方式:打开EXCEL,按ALT+F11调出VBA编辑菜单,把下列符合自己意愿的代码复制到你需要实现高亮显示的工作表上即可。如需要在“sheet3”上实现行列十字架式高亮显示:注意事项:需要在哪张表实现高亮效果,就需要复制这样一段VBA代码,其次,如果想保存,必须保存为启用宏的工作簿。1、选中某单元格实现整行高亮颜色显示PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)Rows().Interior.ColorIndex=0x=ActiveCell.RowRows(x).Interior.ColorIndex=10EndSub部分代码解释:Rows(x).Interior.ColorIndex=10,其中的10,指的是颜色的代码,您可以从1到几百中选择一个颜色的值,此处可修改。以下为颜色参考:3红色6黄色10绿色11深蓝色14青色18梅红色21深紫色2、选中某单元格实现整列高亮颜色显示PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)Rows().Interior.ColorIndex=0x=ActiveCell.ColumnColumns(x).Interior.ColorIndex=10EndSub3、选中某单元格,实现单元格所在行与列高亮颜色显示PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)Cells.Interior.ColorIndex=xlNoneRows(Target.Row).Interior.ColorIndex=10Columns(Target.Column).Interior.ColorIndex=10EndSub

1 / 3
下载文档,编辑使用

©2015-2020 m.777doc.com 三七文档.

备案号:鲁ICP备2024069028号-1 客服联系 QQ:2149211541

×
保存成功