试试这个,新建一个工作簿,新建空白查询,高级编辑器,清空后,粘贴以下M语句。
这是一个自定义函数,可以调用。
- let
fx=(path,sheetname)=> Table.Combine(
Table.ToList(
Table.SelectRows(Folder.Files(path), each [Extension]=".xlsx")[[Content],[Name]],
each Table.AddColumn( Excel.Workbook(_{0},true){[Name=sheetname]}[Data],
"来源",
(x)=>Text.Split(_{1},".xlsx"){0} )
) )
in
fx
复制代码 运行后,界面右侧应该是有一个步骤叫fx,添加一步,公式编辑栏输入=fx(文件夹路径,需要合并的工作表表名),比如,=fx("C:\Data","part list")
测试一下,看什么情况。凭空编的。 |