多工作簿多工作表分别汇总求和

buer123 · 发表于 2021-9-6 14:05

lxin123 发表于 2021-9-6 12:39
弹出文件夹，是选择需要汇总的文件所在的文件夹，你先把需要汇总的工作簿放在一个文件夹内。点击汇总数据的 ...

清除合并的那些数据，不是行名和列名都清除

lxin123 · 发表于 2021-9-6 14:57

直接点击按钮。

buer123 · 发表于 2021-9-6 15:04

lxin123 发表于 2021-9-6 14:57
直接点击按钮。

老师还是得麻烦一下最后两个问题，这些底表是被保护了的，提示1004，然后每个工作簿中不止这三个sheet，但只需要汇总这三个sheet有什么办法嘛

lxin123 · 发表于 2021-9-6 16:02

你的门店数据中“1.2资金计划汇总表-家居or购物中心”工作表的c列中含有错误公式。

buer123 · 发表于 2021-9-7 11:36

lxin123 发表于 2021-9-6 16:02
你的门店数据中“1.2资金计划汇总表-家居or购物中心”工作表的c列中含有错误公式。

这个我删掉之后还是运行错误，老师这些底表是被保护了的提示1004，然后每个工作簿中不止这三个sheet，但只需要汇总这三个sheet有什么办法嘛

lxin123 · 发表于 2021-9-8 08:05

本帖最后由 lxin123 于 2021-9-8 08:55 编辑

试一下这个把，需要把各个数据表放在VBA所在的工作簿文件夹的“资金计划”文件夹下面。
点击按钮。

buer123 · 发表于 2021-9-8 09:38

lxin123 发表于 2021-9-8 08:05
试一下这个把，需要把各个数据表放在VBA所在的工作簿文件夹的“资金计划”文件夹下面。
点击按钮。

Set sh = .Sheets(nm(i))
老师，提示下标越界了，然后我调试是这一句：Set sh = .Sheets(nm(i))
这一句是什么意思呀

lxin123 · 发表于 2021-9-9 08:26

buer123 发表于 2021-9-8 09:38
Set sh = .Sheets(nm(i))
老师，提示下标越界了，然后我调试是这一句：Set sh = .Sheets(nm(i))
这一句 ...

你的工作表名称是"1.资金计划汇总表-合计", "1.1资金计划汇总表-物业", "1.2资金计划汇总表-家居or购物中心"这三个吗？

buer123 · 发表于 2021-9-9 14:44

lxin123 发表于 2021-9-9 08:26
你的工作表名称是"1.资金计划汇总表-合计", "1.1资金计划汇总表-物业", "1.2资金计划汇总表-家居or购物中 ...

有的不是，我明白了非常感谢您

radarzhong · 发表于 2022-11-16 11:31

lxin123 发表于 2021-9-8 08:05
试一下这个把，需要把各个数据表放在VBA所在的工作簿文件夹的“资金计划”文件夹下面。
点击按钮。

问问，宏中表名固定使用，能否通过代码的方式直接在工作薄中提取表名（按顺序提取），目的是更改工作薄名后，不用手动更改宏代码，谢谢。

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

[求助] 多工作簿多工作表分别汇总求和