[已解决]VBA按同类拆分成工作表、工作薄

安全网 · 发表于 2015-9-2 10:02

zjdh 发表于 2015-9-2 09:58
见效果

OK!非常感谢！

yjwdjfqb · 发表于 2015-9-2 11:15

zjdh 发表于 2015-9-2 09:58
见效果

老师你好，我这儿测试了下，不能拆分成单独的工作薄

我的操作平台是　WIN7　　OFFICE2003

麻烦老师看看，谢谢了！

thzss · 发表于 2015-9-2 11:29

我用2003版,拆分为工作簿时出错,问了下度娘,建议将

复制代码

改成

复制代码

这样2003版以上通用

yjwdjfqb · 发表于 2015-9-2 11:47

thzss 发表于 2015-9-2 11:29
我用2003版,拆分为工作簿时出错,问了下度娘,建议将改成这样2003版以上通用

老师你好，我这儿测试拆分成单独工作薄还是没有成功，麻烦老师再帮帮看看，或者把你那儿修改好的附件传个

谢谢了老师！

yjwdjfqb · 发表于 2015-9-2 12:27

zjdh 发表于 2015-9-2 09:57
这容易只要修改一句代码
我已修改，并可适合表头字段是合并单元格（行合并）的情况。

老师你好，我是　WIN7　OFFCIE2003　的操作平台

我在用这个加载宏工具时，拆分不了单独的工作薄，但可以拆分成工作表，
是什么问题呀，是版本问题吗

麻烦老师帮我发一个可以在　　WIN7　OFFCIE2003　的操作平台上运行的　这样的加载宏工具好吧，谢谢老师了！

安全网 · 发表于 2015-9-2 14:04

zjdh 发表于 2015-9-2 09:58
见效果

高人：现在表格拆分遇到一个问题，表格内的数据很大有3万多条，拆分就好慢

zjdh · 发表于 2015-9-2 14:32

我这没有那环境，按33楼的修改试试吧！

zjdh · 发表于 2015-9-2 14:36

安全网发表于 2015-9-2 14:04
高人：现在表格拆分遇到一个问题，表格内的数据很大有3万多条，拆分就好慢

我这是逐行复制的，主要考虑了表格格式，数据大了速度是有点显慢，得改成数组会快点。

zjdh · 发表于 2015-9-2 15:24

安全网发表于 2015-9-2 14:04
高人：现在表格拆分遇到一个问题，表格内的数据很大有3万多条，拆分就好慢

这个是用数组的，你试试是否快点。

安全网 · 发表于 2015-9-2 15:25

zjdh 发表于 2015-9-2 14:36
我这是逐行复制的，主要考虑了表格格式，数据大了速度是有点显慢，得改成数组会快点。

拆分是希望格式不变，但又想速度快

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