excel多个工作簿中的相同工作表名称的sheet合并到一个工作表

四月星空 · 发表于 2015-4-18 13:48

excel多个（200多个）工作簿中的相同工作表名称的sheet合并到一个工作表

每个工作簿中有3个工作表：sheet1 、变更说明、Sheet3 （sheet名称只是本次是这样，下次说不定又会变）
工作表的表头都一样，但是每个工作表的行数是不一样的

结果1：所有的工作簿中的“sheet1”工作表合并在一个工作表，所有的工作簿中的“变更说明”工作表合并在一个工作表，所有的工作簿中的“变更说明”Sheet3 “的工作表合并在一个工作表
结果2：只是所有的工作簿中的“sheet1”工作表合并在一个工作表，其他工作表不合并

非常感谢！

具体件付款

实例及结果.rar (42.1 KB, 下载次数: 133)

KCFONG · 发表于 2015-4-18 14:13

see if help you

四月星空 · 发表于 2015-4-18 14:30

KCFONG 发表于 2015-4-18 14:13
see if help you

提示：可用资源不足，excel无线完成此任务，请少选择些数据或者关闭其他应用程序。点击确定也可以继续

四月星空 · 发表于 2015-4-18 14:42

KCFONG 发表于 2015-4-18 14:13
see if help you

这个提示可以解决吗？

KCFONG · 发表于 2015-4-18 14:48

see if help you

四月星空 · 发表于 2015-4-18 15:15

KCFONG 发表于 2015-4-18 14:48
see if help you

可以用了非常感谢，正在研究中

opiona · 发表于 2015-4-20 14:31

参考：http://club.excelhome.net/thread-1170256-1-1.html

四月星空 · 发表于 2015-4-22 13:23

opiona 发表于 2015-4-20 14:31
参考：http://club.excelhome.net/thread-1170256-1-1.html

表头改了，就得改这句代码，而且必须所有的表的标头都一样才行？？
StrSQL = "SELECT 居间人,应发佣金,营业税,城建税,教育附加,'" & GetPathFromFileName(ARR(I), False) & "' AS 来自工作簿 FROM [" & SHName & "$]"

wwuxxiao · 发表于 2017-11-25 23:18

KCFONG 发表于 2015-4-18 14:48
see if help you

老师，我按你的代码，为什么不显示结果呢？？

LMY123 · 发表于 2018-4-7 10:37

同名工作表合并成一薄多表

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

[求助] excel多个工作簿中的相同工作表名称的sheet合并到一个工作表

评分