主题：这样的代码,还能优化吗?

没有测试数据很难判断那句有问题（最好有足够多的数据），还有你应该告知你统计用了多少时间。

从编码的原则来说，只要达到效果，时间越短越好，不管用了什么方法。

个人认为这样统计，即使是需要统计十多万的甚至几十万的代码应该2-3秒就足够了。

如果就几万数据，可能就1秒多。所以还是要看老朱自己测试的效率是多少了。

还是那句话，导入统计不可取，数据越多效率越低。可以统计完导入再变换，这样2-3秒应该够了

Filter = "[部门] = '" & Ary(0) & "' And 组别='" & Ary(1) & "'And 管组民警='" & Ary(2) & "' And 项目='" & Ary(3) & "'"

你这句话已经跟我说的不一样了。我说的是你连这个都不用导入，后面的计算也都不需要，你获取的已经是你统计完成的表了。

建议你上几百条数据供大家测试，你在进行测试，看看代码能优化到哪里，光看代码，你都没有去测试，哪些代码花费了时间长，、

比如你导入内存话了多少时间，统计代码多少时间，等等。