Excel代码问题，非常感谢！

LSYYLW · 发表于 2024-6-6 19:24

2024-6-7---.zip (4.87 KB, 下载次数: 2)

longwin · 发表于 2024-6-6 19:42

请测试.....

LSYYLW · 发表于 2024-6-6 20:03

longwin 发表于 2024-6-6 19:42
请测试.....

太感谢老师了，代码非常好用。

LSYYLW · 发表于 2024-6-7 07:58

2024-6-8.zip (11.73 KB, 下载次数: 6)

LSYYLW · 发表于 2024-6-7 08:02

longwin 发表于 2024-6-6 19:42
请测试.....

老师您好：今天又来麻烦您了，您有时间帮我看一下4楼附件里有颜色单元格里的文字，帮我解决一下，拜托了！

longwin · 发表于 2024-6-7 09:12

修改的代码在Sheet2

LSYYLW · 发表于 2024-6-7 10:47

2024-6-8--.zip (3.01 KB, 下载次数: 2)

LSYYLW · 发表于 2024-6-7 10:49

longwin 发表于 2024-6-7 09:12
修改的代码在Sheet2

非常感谢老师，代码非常好用。再麻烦老师您一下，您有时间帮我看一下7楼附件里有颜色单元格里的文字帮我解决一下，拜托了！

大灰狼1976 · 发表于 2024-6-7 11:00

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> [v8].Address Then Exit Sub
[j4:t28] = [y4:ai28+al4:av28]
End Sub

LSYYLW · 发表于 2024-6-7 11:03

大灰狼1976 发表于 2024-6-7 11:00
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address [v8].Address Then Exit Sub
...

非常感谢老师，代码非常好用，鲜花稍后为您献上。

		自动登录	找回密码
密码			免费注册

[求助] Excel代码问题，非常感谢！