VBA自动根据部门拆分工作表

BTS7V · 发表于 2018-7-7 15:09

不知道为什么发表于 2018-7-7 13:47
代码如图，供测试

谢谢大神！！

BTS7V · 发表于 2018-7-7 15:09

opiona 发表于 2018-7-7 14:43
附件都是做好的啊！

好的不好意思刚才没看到谢谢

LMY123 · 发表于 2018-7-12 11:14

ADO及字典法，拆分成工作薄

hmhui67 · 发表于 2019-3-24 13:06

opiona 发表于 2018-7-7 13:30

请教下，用这个代码，好像最大只会计算65536行以内的，我这边有个类似的情况，数据量有50万条以上，请问要怎么改？

射手座的箭箭 · 发表于 2019-5-5 15:00

不知道为什么发表于 2018-7-7 13:47
代码如图，供测试

大神，有个问题问你，为啥我copy你的语句跑的时候总是在下面这两句出错，是什么原因呀

Bt.Copy.[a1]
dic(k).Copy.[a2]

不知道为什么 · 发表于 2019-5-5 16:00

射手座的箭箭发表于 2019-5-5 15:00
大神，有个问题问你，为啥我copy你的语句跑的时候总是在下面这两句出错，是什么原因呀

...

copy，后面有个空格，请注意

qinhuan66 · 发表于 2019-6-21 17:14

好好学习天天向上

fengyuelele · 发表于 2020-11-5 18:56

如果要保留最前面的两行代码怎么改，小白请教谢谢大神

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

[已解决] VBA自动根据部门拆分工作表