如何使修改过数据的地方显示红色？

yztxy

我现在有一个电子表，有大量数据，其中也要修改部分数据，为便于修改，我想让修改了数据的单位格显示红色底色。请问各位高手赐教，我如何达到这个 目的。本人急等，谢谢

lu_zhao_long

原帖由 yztxy 于 2009-4-14 18:00 发表
我现在有一个电子表，有大量数据，其中也要修改部分数据，为便于修改，我想让修改了数据的单位格显示红色底色。请问各位高手赐教，我如何达到这个 目的。本人急等，谢谢

什么是修改？难道往空的单元格内输入数据不算修改吗？

yztxy

现发示范表

yztxy

往空的单元格内输入数据也算修改

LangQueS

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Cells(Target.Row, Target.Column).Interior.ColorIndex = 3     '设置单元格的背景色
End Sub

[ 本帖最后由 LangQueS 于 2009-4-14 18:40 编辑 ]

yangrongguan

突出显示修订功能可以差不多满足你的要求，不妨也去试试。

蜀郭浪君

版主 你能不能说说你用的步骤啊 我很想学

LangQueS

鼠标右选工作标签，查看代码，将下面的代码复制到其中：

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Cells(Target.Row, Target.Column).Interior.ColorIndex = 3     '设置单元格的背景色
End Sub

[ 本帖最后由 LangQueS 于 2009-4-14 18:38 编辑 ]

ygq1968

原帖由 LangQueS 于 2009-4-14 18:37 发表
鼠标右选工作标签，查看代码，将下面的代码复制到其中：

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Cells(Target.Row, Target.Column).Interior.ColorIndex = 3     '设置单元格的背景色 ...

十分佩服版主学习VBA  学的真是精通，昨天你的代码帮了我的大忙 谢谢~~
不在一个城市 ，要是在一定请你喝酒~~~~   可以的话 加我QQ：6041329
我加你的QQ也行~~~~~

LangQueS

原帖由 ygq1968 于 2009-4-14 19:38 发表



十分佩服版主学习VBA  学的真是精通，昨天你的代码帮了我的大忙 谢谢~~
不在一个城市 ，要是在一定请你喝酒~~~~   可以的话 加我QQ：6041329
我加你的QQ也行~~~~~

不用谢。我现在还看不懂代码，是东拼西凑的，能使用就好。

★２５９个常用宏★        http://club.excelhome.net/dispbb ... replyID=&skin=0