ExcelVBA 将每个子文件夹中的工作簿合并到指定工作表
网友需求:




以下我讲的代码只保证在office2016/2019/2021/365版本中运行,较早版本请自行测试,WPS不保证能运行。
但是您限定VBA处理,我在VBA中写代码解答。
在C盘孙兴华文件夹里,有A和B两个文件夹(可以有更多)

A和B是孙兴华的子文件夹,下面不在有更深的层次,只是在子文件夹中装有若干工作簿


每个工作簿中有若干工作表,每个工作表字段数量和名称一致,且没有多行表头
将每个文件夹下的工作簿中所有工作表合并放到指定工作表下,工作表名称是子文件夹的名称
打开一个新工作簿,复制下面代码,运行,得到数据后,想只在到哪里就保存到哪里。代码均有出处,都是课上讲过的。
本文章配套课件已经放到平均论,解压后将孙兴华文件夹拷贝到C盘根目录下。

ExcelVBA教程:https://www.bilibili.com/video/BV1rt4y1a72y