excel如何实现更改数据就自动填充颜色的功能？

smile夜行者

excel如何实现更改数据就自动填充颜色的功能

风筝那根线

写入sheet2里

1. Private Sub Worksheet_Change(ByVal Target As Range)
   
2.     Sheet1.Cells(Target.Row, Target.Column).Interior.ColorIndex = 3
   
3. End Sub

复制代码

smile夜行者

风筝那根线 发表于 2019-12-16 17:37
写入sheet2里

大师，能不能在sheet1表中写的代码啊~~~由于我的sheet1工作表链接后面很多表的，这个附件只是我为了举例子，所以只链接了一个sheet2而已~~~~~~~

liangmutou01

见程序。反映两次选择表1之间的变化，也记录了历史变化。无论你连接多少表。

smile夜行者

liangmutou01 发表于 2019-12-16 21:01
见程序。反映两次选择表1之间的变化，也记录了历史变化。无论你连接多少表。

为什么我把你的编码放进我的excel工作表里面中去，就出现这样的

liangmutou01

如果你愿意，把你使用的文件发来，直接搞定。
根据提示的情况，你要插入一个模块，将cz程序复制进去，具体见我发给你的文件。

smile夜行者

liangmutou01 发表于 2019-12-18 11:50
如果你愿意，把你使用的文件发来，直接搞定。
根据提示的情况，你要插入一个模块，将cz程序复制进去，具体 ...

我已经加您的QQ，您没有同意，我想把我的文件发给您！！！

我想让我的工作表“工程量汇总”出现变色~~~
如果我将我的工作表“柱”中的D3单元格由数值0.512修改成10.512，那么我的工作表“工程量汇总”中的F5单元格数值会变成8.11并自动填充成红色