ExcelTip.Net留存知识帖 ---【注:附件之前被网盘供应商清空后,现已修复-现已修复-现已修复为本地下载!】
现在位置:首页 > E问E答 > Excel VBA > 如何使活动单元格所在行列变色

如何使活动单元格所在行列变色

作者:绿色风 分类: 时间:2022-08-17 浏览:114
楼主
gvntw
Q:如何使活动单元格所在行列变色
A:按<Alt+F11>,进入VBA编辑器,在代码窗口粘贴下的代码。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Cells.Interior.Color = xlNone
    Union(Target.EntireRow, Target.EntireColumn).Interior.Color = vbYellow
End Sub活动单元格变色.gif
 
2楼
hlxz
哈哈 gvntw  大哥 看我的

 
本例子  源与罗刚君的思路 ,不过没有分享代码给我

这个是我仿 罗刚君 的背景工具 做的

适合任何 工作表 工作簿                不 需要每个工作表都去编代码
1.用到类模块了只适合 工作簿内的任何工作表使用
2.用到dll 加载   可 适合  任何 工作表 工作簿
3.另外我的QQ空间 有解决 粘贴的方法

3楼
gvntw
TO hlxz 小妹妹:
你的工具功能是比较全,含金量高,但对一般用户来说,要学习困难性比较大,我的方法是使用很简单,就是从未接触过VBA的用户也很容易掌握,缺点是取消了原来的填充颜色。
如果要应用到所有工作簿,那倒也可以,用类模块,并作成加载宏。
4楼
洋五月
你的空间怎么进去?
5楼
hlxz
QQ空间啊!
6楼
hlxz
急了?
也让你急一回,


不过, 我的意思: 也就是 看到你这个颜色的主题
分享一下 我的dd   
仅此而已
7楼
gvntw
呵呵,妹妹是我邀请来的,我急什么呀。
希望这里能成为你展示自我的大舞台!
8楼
罗刚君
gvntw的方法会破坏背景,还会禁用撤消功能和复制粘贴功能,虽然简单点,用户可能不太高兴
hlxz的方法破坏条件格式和撤消功能
已经有解决这些所有问题的方法了
http://www.exceltip.net/thread-167-1-1.html

1.不会破坏用户文件的背景色
2.不会破坏用户的条件格式设置
3.不会禁用复制\粘贴功能
4.录入数据时,着色条不会错位
5.支持18种颜色可选
6.颜色预览,即选色时可以查看颜色实际效果
7.EXCEL子2003和EXCEL 2007通用
8.可以使用撤消功能
9楼
gvntw
TO 罗兄:
不会禁用复制粘贴功能,可以复制粘贴;撤消基本是被禁用了,因为只能撤消上一步操作,而且必须还未选定任意单元格。
BTW:
E问E答版是FAQ版块,复杂的工具我会发到 [我的酷帖] (可惜我不会,
10楼
罗刚君
于 2009-1-2 11:40 发表

TO 罗兄:
不会禁用复制粘贴功能,可以复制粘贴;撤消基本是被禁用了,因为只能撤消上一步操作,而且必须还未选定任意单元格。
BTW:
E问E答版是FAQ版块,复杂的工具我会发到
11楼
hlxz
无语
2003 撤销复制粘贴功能 我QQ空间 已经想了一个 方案
如果 条件格式 不破坏的话 我没有想出来
模仿人 中不会 高于源创造 人

再次 无语
12楼
naughty
背景工具那个按钮在哪?我怎么找不到?
13楼
naughty
为什么在我这不好用啊
,代码放到里面按回车后出错!
14楼
yncxxmj
谢谢楼主的分享。
15楼
libai8
我太笨了 这样照着都不会做
16楼
JOYARK1958
謝謝提供.................................下載學習
17楼
lrlxxqxa
学习不同思路。我是用条件格式弄这种效果的
18楼
非凡
可以连列也变色就好了
19楼
老糊涂
不错,以后大屏幕演示的时候可以用到

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素, 经与ExcelTip.Net站长Apolloh商议并征得其同意, 现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示, 供有需要的人士查询使用,也慰缅曾经的论坛时代。 所示各个帖子的原作者如对版权有异议, 可与本人沟通提出,或于本站点留言,我们会尽快处理。 在此,感谢ExcelTip.Net站长Apolloh的支持,感谢本站点所有人**绿色风(QQ:79664738)**的支持与奉献,特此鸣谢!
------本人网名**KevinChengCW(QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表
sitemap