工作表整行跟随鼠标移动显示颜色（注：不是点击单元格）

hyfire2008

苏子龙 发表于 2017-9-29 13:08
百度下就有了，http://club.excelhome.net/thread-1222503-1-1.html，是否差不多？
没有金币的可以试试这 ...

这个帖子当时真没有看到，效果很好，只是有个小BUG,就是鼠标不在表格区域那高亮颜色不停的闪

hyfire2008

hhzjxss 发表于 2017-9-29 13:25
试试我收藏并修改的这个怎么样！

你的附件我刚试了一下，双击单元格更改数据后并没有留下底色，你的代码比较简洁

hyfire2008

徐淑颖 发表于 2017-9-29 12:32
这个不是插件里的功能嘛

哪个插件？

02761752696

厉害，顶

hhzjxss

hyfire2008 发表于 2017-9-29 13:31
这个帖子当时真没有看到，效果很好，只是有个小BUG,就是鼠标不在表格区域那高亮颜色不停的闪

你说的确实有这个问题，我原来也研究过很多代码，没有找到完美的版本！

hhzjxss

hyfire2008 发表于 2017-9-29 13:31
这个帖子当时真没有看到，效果很好，只是有个小BUG,就是鼠标不在表格区域那高亮颜色不停的闪

你的代码也存在一个问题：
就是光标一直在不停的闪！

大灰狼1976

hyfire2008 发表于 2017-9-29 13:31
这个帖子当时真没有看到，效果很好，只是有个小BUG,就是鼠标不在表格区域那高亮颜色不停的闪

其实把这句删掉：Union(Columns(C), Rows(R)).Select
这句修改一下后：Union(Columns(C), Rows(R)).Interior.Color = RGB(218, 120, 210)
光标移出表格区也不会闪了，直接不涂色。

hhzjxss

发几个收藏大家看看！

hhzjxss

大灰狼1976 发表于 2017-9-29 16:10
其实把这句删掉：Union(Columns(C), Rows(R)).Select
这句修改一下后：Union(Columns(C), Rows(R)).Inte ...

修改后确实不闪了，但是还有一个小问题：

会破坏原来单元格的底色！

hhzjxss

我目前使用的是从PUP6里面提出来的Rowliner插件，是用光标移动，不是鼠标移动的，感觉还可以