鼠标颜色怎么换（鼠标变颜色怎么设置）
鼠标移动过去就能变色，这样的效果怎么样？
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列移动，看看效果吧：
图文作者：罗子阳
图书《Excel VBA经典代码应用大全》作者之一
赞 (0)