多个Excel工作簿合并（表头不一致）

莱柯007 · 发表于 2022-7-18 18:18

有多个Excel工作簿；
每个表都有表头信息，行记录信息开始行不固定；
行记录头字段不完全相同，位置不完全相同；
如何通过Powerquery合并到一张表,并取得表头信息“头信息1”

表格式见附件，

鄂龙蒙 · 发表于 2022-7-18 19:58

结果式样表？？？

Eric0236 · 发表于 2022-7-18 21:12

把店铺和头信息1都拿出来做了一列，你可以自己再修改，文件夹地址也记得修改下

合并求助.zip (36.75 KB, 下载次数: 49)

莱柯007 · 发表于 2022-7-21 11:50

这里展开字段为什么不能用Table.ColumnNames() 啊

莱柯007 · 发表于 2022-7-21 11:51

这里展开字段为什么不能用，table.ColumnNames() 我就是用了这个函数，出来就少了字段

luzwales · 发表于 2022-7-23 10:39

只要每个表的列排列是一样的（第一列，第二列的内容一致），可以批量改名，再合并。
如果每个文件列排列不一致，列名有千奇百怪，那就很难弄了！

gyyan · 发表于 2022-7-25 17:40

let
Source = Folder.Files("C:\Test\合并求助"),
Table = List.Transform( Source[Content] , each Excel.Workbook(_)[Data]{0}),
Position = List.Transform( Table, each List.PositionOf(_[Column1],"Transaction creation date")),
Data = List.Transform( {0..Table.RowCount(Source)-1}, each Table.PromoteHeaders(Table.Skip(Table{_}, Position{_}))),
Headers = List.Distinct(List.Combine(List.Transform( Data , each Table.ColumnNames(_)))),
CombinedData = Table.Combine( List.Transform({0..Table.RowCount(Source)-1}, each Table.FromRows({ {Source[Name]{0}} & {Data{0}} })) ),
#"Expanded Column2" = Table.ExpandTableColumn(CombinedData, "Column2", Headers)
in
#"Expanded Column2"

莱柯007 · 发表于 2022-7-28 09:03

gyyan 发表于 2022-7-25 17:40
let
Source = Folder.Files("C:\Test\合并求助"),
Table = List.Transform( Source[Content] , e ...

厉害，谢谢

莱柯007 · 发表于 2022-7-28 09:06

我知道为什么用table.ColumnNames() 丢失字段了，就只引用了第一个表的表头，

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

[求助] 多个Excel工作簿合并（表头不一致）