专栏名称: Excel之家ExcelHome
excel技巧原创教程每日推送,excel表格职场模板干货仓库,图文/视频/动画等多种教学方式分享excel操作技巧教程/excel函数公式教程/excel数据透视表教程/excel图表教程/Word教程,助您轻松提高办公效率!
目录
相关文章推荐
Excel之家ExcelHome  ·  Excel易用宝V2.6上线,数据处理一键完 ... ·  4 天前  
完美Excel  ·  让VLOOKUP函数能够查找并返回列表左侧的值 ·  6 天前  
Excel之家ExcelHome  ·  Excel版通用数据查询表 ·  1 周前  
Excel之家ExcelHome  ·  这些WPS表格技巧,用过都说好 ·  1 周前  
完美Excel  ·  交互式图表示例:生成GIF动画 ·  1 周前  
51好读  ›  专栏  ›  Excel之家ExcelHome

最有爱的VBA讲解,信息量很大

Excel之家ExcelHome  · 公众号  · Excel  · 2017-09-25 07:14

正文

大家好啊,我是随风,昨天星光女神突然找到我……


风哥哥,我问你个问题。。。

爱过!

讨厌!能不能好好聊天了。以前咱不是有过一个教程,是聚光灯的么?还记得不?(聚光灯制作  点此查看)

当然记得,我写的啊。

对啊,但是你有没有感觉,每次都要点好费鼠标的,可不可以不点鼠标,直接鼠标移动过去就能上“色”

可是工作表没有鼠标移动事件啊!

不管,我就要!!!!

好好,容我想想,但是有个条件。。。。

噼里啪啦……

风哥哥,行吗?听说一定要什么API什么什么的,是不是挺麻烦的?

男人怎么能说不行!不用API,走起!

Step 01 

准备数据源


Step 02

Alt+F11  打开VBE窗口,【插入】→模块】

复制如下代码到模块中

Function color()

[e1] = Application.Caller().Row 

End Function


Step 03

退出VBE,在数据源最后一列做辅助列

输入公式:

=IFERROR(HYPERLINK(color(),"劫色"),"劫色")


Step 04:

下拉公式,这时候鼠标移动到D列单元格,E1单元格就会出现行号哦。

Step 05:

选中A2:C11单元格区域设置条件格式


Step 06:

确定之后,鼠标在D列移动你会发现。。。



哇,风哥哥威武!我去洗澡了

别忘了存成启用宏的文件(xls、xlsm)!

不要捡肥皂!



易学宝微视频教程,1290个Office技巧精粹,每个技巧都与实际工作密切相关。轻松学习技巧,练就职场达人。淘宝搜索关键字:ExcelHome易学宝

本公众号回复关键字:大礼包  立刻免费获取50集精选易学宝教程