VBA查找匹配问题

●_純灆sё°

山菊花 发表于 2019-12-11 18:53
Drr(i, n) = "YES"
改为：
If n > 5 Then

好，一会到家了改了测试下，谢谢老师。

●_純灆sё°

山菊花 发表于 2019-12-11 18:53
Drr(i, n) = "YES"
改为：
If n > 5 Then

按老师的改了后，解决了，

现在还有个问题是当系统时间减去crr(i,8)日期时得出来的负数，我如何修改代码将负数的清空，只清空负数，不是删除负数所在行的数据。

如下图

山菊花

●_純灆sё° 发表于 2019-12-11 23:31
按老师的改了后，解决了，

现在还有个问题是当系统时间减去crr(i,8)日期时得出来的负数，我 ...

附件已更新，请重新下载。

●_純灆sё°

山菊花 发表于 2019-12-12 07:16
附件已更新，请重新下载。

老师早，解压密码是多少呢，有解压密码

山菊花

●_純灆sё° 发表于 2019-12-12 08:52
老师早，解压密码是多少呢，有解压密码

没有加密码，请再试。

●_純灆sё°

山菊花 发表于 2019-12-12 09:08
没有加密码，请再试。

可以了。原来是我浏览器问题，下载下来会自动加密，太神奇了