欢迎来到天天文库
浏览记录
ID:40088019
大小:79.50 KB
页数:3页
时间:2019-07-20
《Excel选择某单元格整行变色是这样做的》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、Excel选择某单元格整行变色是这样做的 如果您在输入数据的时候,尤其是数据量比较大的情况,往往会因为无法直观的判断单元格所在的行,导致输入的数据输入到其它的行! 那么,有没有一种办法,能让我们实现,一旦选择了哪个单元格,该单元格的所在的行的颜色会发生改变,这样,我们就能直观的看出,数据应该输入到哪行了。方法/步骤1.1根据目前的情况,要实现这样的效果,只能使用VBA来实现,下面是方法,请君过目。 如下图,这是正常情况下的效果,当我们选择一个单元格后,只有这个单元格边框颜色有所变化,该行的其它单
2、元格,都未发生任何变化。2.2现在,我们要做的就是,如下图一样,一旦选择了某个单元格,那么,该单元格所在的行,颜色发生改变,以方便我们录入数据。3.3实现的方法是,在工作表名称(如:Sheet1)上点击右键,在弹出的快捷菜单中选择“查看代码”,如下图!1.4接下来,会弹出VBA代码编写窗口,如下图!2.5上图中,在Sheet1上点击右键,选择“查看代码”,弹出代码编写窗口。 现在,我们要做的就是输入VBA功能代码了,代码如上图!记住,先选择好Worksheet对象名称和SelectionChange
3、事件名称,然后在窗口中输入如上图右边的那些代码。 为方便大家学习,下面粘贴出源代码: PrivateSubWorksheet_SelectionChange(ByValTargetAsRange) Rows().Interior.ColorIndex=0 x=ActiveCell.Row Rows(x).Interior.ColorIndex=9 EndSubPrivateSubWorksheet_SelectionChange(ByValTargetAsRange)Columns().I
4、nterior.ColorIndex=0Rows().Interior.ColorIndex=0x=ActiveCell.Rowy=ActiveCell.ColumnRows(x).Interior.ColorIndex=19Columns(y).Interior.ColorIndex=19EndSub
此文档下载收益归作者所有