见证成长历程---我的答疑解难代码汇总

lsc900707

凤翔时代 发表于 2019-5-18 08:05
多谢，辛苦您了，是我没有表达清楚。应该是各自在各自的表内进行重复值删除，也就是说，执行代码后，除“ ...

我只是为了测试才把4条数据放在一起备份，你自己测试就知道。

凤翔时代

lsc900707 发表于 2019-5-18 08:18
我只是为了测试才把4条数据放在一起备份，你自己测试就知道。

我表达不清楚了，把执行前后的文件一起上传了，您帮再看下，谢谢

lsc900707

凤翔时代 发表于 2019-5-18 10:55
我表达不清楚了，把执行前后的文件一起上传了，您帮再看下，谢谢

白天出去玩了，迟复为歉：

凤翔时代

lsc900707 发表于 2019-5-18 23:34
白天出去玩了，迟复为歉：

没关系的，您客气了，谢谢。只是情况有点变化，昨天经过仔细检查，各人的表中，确实在同一天发生了相同金额的情况，所以，还想请您帮修改一下代码，不是直接删除数据，而在M列中，对应的标示“重复”字样，准备核实之用，核实之后再删除数据。不知可否，谢谢！
另，我昨天也根据论坛里各位老师的各个案例，改写的一段，效率低了点，效果还不错，已经放入附件上传。

lsc900707

凤翔时代 发表于 2019-5-19 09:11
没关系的，您客气了，谢谢。只是情况有点变化，昨天经过仔细检查，各人的表中，确实在同一天发生了相同金 ...

根据要求改为标识重复：

凤翔时代

lsc900707 发表于 2019-5-19 10:25
根据要求改为标识重复：

谢谢，帮了大忙了！

sculiaods

lsc900707 发表于 2018-4-30 08:49
各位大侠，能否用VBA筛选之后拆分，详见附表，谢谢！！
http://club.excelhome.net/thread-1410686-1-1.ht ...

大神，您好！运算很慢，因为原表较为复杂，有改进效率的办法吗？

lsc900707

sculiaods 发表于 2019-6-12 09:19
大神，您好！运算很慢，因为原表较为复杂，有改进效率的办法吗？

上传你的附件。

flyfairy

nikonmonarch 发表于 2017-3-19 11:09
d(Arr(i, 1)) = Array(Arr(i, 2), Arr(i, 3), Arr(i, 4))
    crr(i, j + 1) = d(brr(i, 1))(j)

能给解释一下这段代码是什么意思吗，看了半天没看懂

sculiaods

lsc900707 发表于 2019-6-12 09:36
上传你的附件。

非常感谢，自己摸索解决了。原来有太多有公式，但是没内容的行了，改了下代码OK了。