晚上闲着无聊,打开Excel折腾起来。
本来我的思路设计一个VBA,为了实现标记(加底纹)修改过的单元格以便区分。
这其中就得利用change事件来实现了。
代码很简单的,实质的就一句话:
- Private Sub Worksheet_SelectionChange(ByVal Target As Range)
- Target.Interior.ColorIndex = 7
- End Sub
可怜吧?就第二句那么一句,可怜巴巴的!
解释一下原理吧:就是当你触发修改任何单元格(包括点击单元格),都会被自动加上底纹颜色为红色(不是纯红的,自己看颜色图,那颜色我一下叫不出了)
但是change事件你鼠标点点都算,所以被我折腾成了画图工具了。
怎么画?听着!
上述代码准备好后,将鼠标点在你要开始画的起点,然后利用键盘方向键控制单元格行走,走过的路径都会被标记。说实话有点贪吃蛇的感觉!
好好的代码,被我折腾成小游戏,哎!
当然颜色有需要自己参照颜色表改动。
Have A Try!大家玩好!看看我的作品~~见笑!我比较能折腾!折腾无罪!
博主真是认真的人啊