首页 >>  正文

vba批量合并工作薄

来源:baiyundou.net   日期:2024-09-20

领导发给了一个文件夹,里面有包含工作簿,让我快速汇总合并到一个工作簿里面去

这个文件夹打开之后,里面还有内层的多个文件夹,如下所示:

然后在文件夹里面,有格式相同的工作簿

如果一个一个的手动的复制,那效率太低了,而且容易出错,今天分享一个技巧,无需使用VBA代码,快速的将文件夹中的工作簿全部的汇总

1、新建汇总工作簿

我们在文件夹最外层,新建一个用来汇总的工作簿

打开这个汇总工作簿,然后我们选择数据,获取数据,选择来自文件,选择从文件夹

找到对应的文件夹路径,打开

会有一个弹窗,搜索到文件夹内所有的文件,我们点击转换数据,如下所示:

2、PQ操作

接下来,会弹出一个Powerquery的窗口,我们简称PQ

然后我们,选择添加列,选择自定义列,在里面输入公式:

=Excel.Workbook([Content],true)

需要注意大小写,否则会出错

然后我们点击自定义列右边的按纽,进行扩展数据

然后会出现自定义.data这个字段,我们继续进行扩展数据:

这个时候,鼠标会自动选中我们需要的数据,我们只需要点击主页,删除列,删除其他列,就可以把一些不需要的元素给进行删除

3、回传数据

我们点击文件,点击关闭并上载至

选择新工作表加载,这样文件夹中的所有数据就汇总到了一张表格里面了

而且当文件夹中的数据有更新的时候,只需要刷新数据,也能实时的进行同步更新

这个小技巧,你学会了么?动手试试吧!

","gnid":"92102831a6b913273","img_data":[{"flag":2,"img":[{"desc":"","height":"133","title":"","url":"https://p0.ssl.img.360kuai.com/t017e5c70a98c77d20e.jpg","width":"165"},{"desc":"","height":"373","title":"","url":"https://p0.ssl.img.360kuai.com/t0189b3070e8d8f59f0.jpg","width":"633"},{"desc":"","height":"713","title":"","url":"https://p0.ssl.img.360kuai.com/t012c1d54b3c820cf92.jpg","width":"834"},{"desc":"","height":"140","title":"","url":"https://p0.ssl.img.360kuai.com/t01f76f93a32cbaabe0.jpg","width":"239"},{"desc":"","height":"669","title":"","url":"https://p0.ssl.img.360kuai.com/t01c44eae87c61b390a.jpg","width":"728"},{"desc":"","height":"584","title":"","url":"https://p0.ssl.img.360kuai.com/t01944d37f0876920c8.jpg","width":"756"},{"desc":"","height":"490","title":"","url":"https://p0.ssl.img.360kuai.com/t01a15eba493fda63a0.jpg","width":"840"},{"desc":"","height":"725","title":"","url":"https://p0.ssl.img.360kuai.com/t01b72515c3f568bb29.jpg","width":"1039"},{"desc":"","height":"646","title":"","url":"https://p0.ssl.img.360kuai.com/t0125ba286f22c870d5.jpg","width":"1033"},{"desc":"","height":"645","title":"","url":"https://p0.ssl.img.360kuai.com/t0172f6b91445adf048.jpg","width":"882"},{"desc":"","height":"573","title":"","url":"https://p0.ssl.img.360kuai.com/t01ed33ef74e6514216.jpg","width":"1054"},{"desc":"","height":"776","title":"","url":"https://p0.ssl.img.360kuai.com/t01865dd506febf7417.jpg","width":"1262"},{"desc":"","height":"988","title":"","url":"https://p0.ssl.img.360kuai.com/t011553e10ce402361e.jpg","width":"880"}]}],"original":0,"pat":"art_src_3,fts0,sts0","powerby":"cache","pub_time":1708410600000,"pure":"","rawurl":"http://zm.news.so.com/aa06b786da87c7d4a146b9a4ed785eb3","redirect":0,"rptid":"65ac454cbb6046a6","rss_ext":[],"s":"t","src":"Excel自学成才","tag":[],"title":"跨多个文件夹合并Excel工作簿,1分钟快速搞定

于耿鹏3207VBA 如何储存所有打开的工作簿到新的指定路径(批量一次性另存) -
查符杨17320391374 ______ 代码如下: Sub aa() '循环所有打开的工作簿 For Each c In Workbooks '将其另存为C盘下,文件名不变,其中C:\可以修改成需要的路径 c.SaveAs "C:\" & c.Name Next End Sub

于耿鹏3207怎么把多个excel工作簿合成一个工作簿? -
查符杨17320391374 ______ 直接选取所需要的工作表,然后右键选择移动或复制会弹出对话框,直接选择要合并的工作簿就可以了.注意是在工作表上右键,而不是在工作表内容里面全部选择再复制.

于耿鹏3207如何把两个excel工作簿里的内容合成一个工作簿 -
查符杨17320391374 ______ 两个excel工作薄里的内容合成一个工作薄的方法如下:将需要合并的excel工作簿文件放置在一个文件夹中.每个文件夹中的工作簿都输入了简单的内容.在该文件夹中,新建立一个新的excel工作簿文件.重命名为8.打开新建立的excel工作簿文...

于耿鹏3207如何用VBA汇总相同格式的工作薄? -
查符杨17320391374 ______ 我这儿有个现成的,工作中也有这个需要滴~ 先把那一百个文件复制到同一个文件夹内,做好备份,对这个文件夹内的工作薄处理就好了 代码如下,写在一个Excel里面,100个工作薄也会汇总在这个Excel里面:Sub Test() Application....

于耿鹏3207怎么将多个Excel工作簿合并成一个新的工作簿 -
查符杨17320391374 ______ 1、新建一个工作簿,并命名(如汇总工作簿);2、逐一打开你要合并的工作簿,点击第一个工作表的标签,再按SHIFT键,点击最后一个工作表的标签,全选全部工作表,击右键,将工作表 建立副本 复制到汇总工作簿中;3、重复以上1、2步骤至全部工作簿中的工作表复制完成.当然你也可用VBA程序完成以上操作.

于耿鹏3207如何快速合并单个excel表中的多个sheet的工作页 -
查符杨17320391374 ______ 可以利用VBA快速合并单个excel工作簿中的多个工作表(sheet) 软件版本:Office2007 方法如下:1.当前工作簿中有多个工作表,结构都一样如下所示,当里面的数据不一样,将它们全部合并到当前工作表中:2.Alt+F11,打开宏界面,输入如...

于耿鹏3207如何快速合并单个excel表中的多个sheet的工作页 -
查符杨17320391374 ______ https://jingyan.baidu.com/article/19020a0ad8080d529d28422a.html

于耿鹏3207如何快速合并单个excel表中的多个sheet的工作页 -
查符杨17320391374 ______ 可以利用VBA快速合并单个excel工作簿中的多个工作表(sheet) 软件版本:Office2007 方法如下:1.当前工作簿中有多个工作表,结构都一样如下所示,当里面的数据不一样,将它们全部合并到当前工作表中:2.Alt+F11,打开宏界面,输入如...

于耿鹏3207如何快速合并单个excel表中的多个sheet的工作页 -
查符杨17320391374 ______ 可以利用VBA快速合并单个excel工作簿中的多个工作表(sheet) 软件版本:Office2007 方法如下:1.当前工作簿中有多个工作表,结构都一样如下所示,当里面的数据不一样,将它们全部合并到当前工作表中:2.Alt+F11,打开宏界面,输入如...

于耿鹏3207如何快速合并单个excel表中的多个sheet的工作页 -
查符杨17320391374 ______ 可以利用VBA快速合并单个excel工作簿中的多个工作表(sheet) 软件版本:Office2007 方法如下:1.当前工作簿中有多个工作表,结构都一样如下所示,当里面的数据不一样,将它们全部合并到当前工作表中:2.Alt+F11,打开宏界面,输入如...

(编辑:自媒体)
关于我们 | 客户服务 | 服务条款 | 联系我们 | 免责声明 | 网站地图 @ 白云都 2024