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分钟快速搞定

樊该金2032excel中怎样用VBA把一列数据都与某个单元格合并? -
冯法怖13171427509 ______ VBA??上面那个938950是怎么来的?可以扣一五九六三九七零或者用下面的代码:Sub test() Dim erow Range(＂G:G＂).NumberFormat = ＂@＂ erow = Cells(Rows.Count, ＂A＂).End(3).Row For i = 2 To Cells(Rows.Count, ＂A＂).End(3).Row Cells(i, ＂G＂) = Cells(erow, ＂A＂) & Cells(i - 1, ＂A＂) Next End Sub

樊该金2032如何用VBA循环语句实现EXCEL批量合并单元格 -
冯法怖13171427509 ______ 没调试,试试行不合并要从下往上 sub main for i=15 to 2 step -1 if cells(i,＂B＂)=cells(i-1,＂B＂) and cells(i,＂A＂)=cells(i-1,＂A＂) then range(cells(i,＂B＂),cells(i-1,＂B＂)).merge end if next i

樊该金2032excel如何用vba实现abcde整个5列内容合并到f列(每列数据很多)
冯法怖13171427509 ______ 这5列是什么数据类型?数值合并是求和,字符串合并是连接.简单的用公式可以实现(以第二行为例):数值:=SUM(A2:E2)字符串:=PHONETIC(A2:E2)如果要用VBA实现:SUB TRY() '从第二行开始合并,到A列为空停止.DIM I AS LONGI=...

樊该金2032vb问题 - 怎么把两个含有VBA的excel合并成一个 -
冯法怖13171427509 ______ 因为excel中的save和saveas方法都是保存工作簿的,所以因为你的工作簿中有两个sheet,所以生成的工作簿同样有两个sheet.处理的方法是改VBA,在保存时,先将当前活动的sheet复制到一个只有一个sheet的新工作簿中,再保存这个新工作簿就达到你的目的了.具体怎么改要看你的代码,但大致如下:将Save或SaveAs的那一句语句改成下面两句 ActiveSheet.Copy ActiveWorkbook.SaveAs '如果需要其它参数可以参照原句的加上

樊该金2032excel VBA合并单元格,保留单元格内容 -
冯法怖13171427509 ______ 代码如下:Sub aaa()For i = 2 To Range(＂L65536＂).End(xlUp).Row If Cells(i, ＂K＂Then j = i Else Cells(j, ＂M＂...

樊该金2032怎么把几张excel表格中的内容合并到一张表里 -
冯法怖13171427509 ______ 可以利用VBA将多个格式相同的Excel表格数据快速合并到一张表格中.软件版本:Office2007 方法如下:1.在当前工作簿中有多个格式万全相同,但数据不同的工作表,将其内容合并到SHeet1中:2.Alt+F11,输入代码如下:sub m() for each sh in sheets if sh.name<>Sheets(1).name then sh.range(＂A2:B3＂).copy sheets(1).range(＂A＂&Sheets(1).range(＂A65536＂).end(4).row+1) end if next end sub3.F5执行代码,得到结果如下:

樊该金2032如何快速的合并多个 Excel 工作簿成为一个工作簿 -
冯法怖13171427509 ______ 将需要合并的excel工作簿文件放置在一个文件夹中. 每个文件夹中的工作簿都输入了简单的内容. 怎么将多个Excel工作簿合并成一个新的工作簿在该文件夹中,新建立一个新的excel工作簿文件.重命名为8. 打开新建立的excel工作簿文件8....

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

樊该金2032EXCEL VBA填充合并内容 -
冯法怖13171427509 ______ 下面的代码满足你的要求:Sub YgB() Dim n '获得行数 n = Cells(Rows.Count, ＂B＂).End(xlUp).Row '写公式 [U14] = ＂=C14&F13＂ [V14] = ＂=C13&F14＂ [W14] = ＂=D14&E13＂ [X14] = ＂=D13&E14＂ '填充 Range(＂U14:X＂ & n).FillDown End Sub

樊该金2032如何快速合并单个excel表中的多个sheet的工作页 -
冯法怖13171427509 ______ https://jingyan.baidu.com/article/19020a0ad8080d529d28422a.html

（编辑：自媒体）