PowerQuery合并工作簿问题求教。

lkendo

以前没有基础，在工作中遇到问题就边百度边处理。 能弄出个大概，但是搞不了很完整，其中表头处理就经常报错，实在要用的时候我都是先去手动整理基础表的。  
然后突然看到这么一个文章，链接如下：excel中，如何批量合并表头不一致的工作表-百度经验 (baidu.com)。好像很厉害，于是自己也动手去试试。 文章中的代码没有文本，我都照着去输入，但是不断报各种错误，并不能反馈出结果。
我输入的代码如下：

let
    源 = Folder.Files("C:\Users\Administrator\Desktop\新建文件夹\城市列表"),
    替换的值 = Table.Replacevalue(源,"xlsx","",Replacer.ReplaceText,{"Name"}),
     已添加自定义 = Table.AddColumn(替换的值,"自定义",each Excel.Workbook([Content,true])),         删除的其他列 = Table.SelecColumns(已添加自定义
    展开的自定义 = Table.ExpandTableColumn(删除的其他列,"自定义,{"Name,"Data"},{"Name.1",          "Data"}),
    字段 = List.RemoveNulls(List.Distinct( List.Combine(List.Transform(展开的自定义[Data],each    Table.ColumnNames(_))))),
     #"展开的“Data”" = Table.ExpandTableColumn(展开的自定义，"Data",字段）
in
    #"展开的“Data”"


请教各位高手，错在哪？ 能否通过附件演示一个结果出来给我学习一下？ 谢谢

Eric0236

附件中每个文件的sheet2是手工处理添加的吧，我都删除了。
第一步没问题，然后添加自定义列，希望能处理成一个统一的表格，因此还需要分几个步骤，我喜欢用这种record分步的方式写，便于跟踪和查找问题。这步添加好之后，接下来就是常规操作了。
下面步骤供参考
let
    源 = Folder.Files("C:\Users\Administrator\Desktop\新建文件夹\城市列表"),
    自定义 = Table.AddColumn(源, "自定义", each
        [a = Excel.Workbook([Content])[Data]{0},
        b = Table.ToColumns(a){0},
        c = List.PositionOf(b, "日期"),
        d = Table.Skip(a, c),
        e = Table.PromoteHeaders(d)
        ][e]
    ),
    删除列 = Table.SelectColumns(自定义,{"自定义"}),
    展开 = Table.ExpandTableColumn(删除列, "自定义", {"日期", "分公司", "业务员", "商品", "数量", "金额"}, {"日期", "分公司", "业务员", "商品", "数量", "金额"}),
    筛选 = Table.SelectRows(展开, each ([日期] <> null))
in
    筛选

lkendo

Eric0236 发表于 2023-2-6 23:03
附件中每个文件的sheet2是手工处理添加的吧，我都删除了。
第一步没问题，然后添加自定义列，希望能处理成 ...

我是看不太懂，你的代码直接粘进去没有错误，返回出结果。  但是南京那个文件夹中有一列（“又一个数量”）没有查询出来。

lkendo

h   t  t p s           jingyan.baidu.com/article/e9fb46e173be773421f7668f.html

lkendo

Eric0236 发表于 2023-2-6 23:03
附件中每个文件的sheet2是手工处理添加的吧，我都删除了。
第一步没问题，然后添加自定义列，希望能处理成 ...

百度标题 excel中，如何批量合并表头不一致的工作表？jingyan.baidu.com/article/e9fb46e173be773421f7668f.html

Eric0236

lkendo 发表于 2023-2-7 08:58
我是看不太懂，你的代码直接粘进去没有错误，返回出结果。  但是南京那个文件夹中有一列（“又一个数量” ...

那是因为我只保留了原文件中的sheet1，你可以尝试添加一列“又一个数量”，把“展开”这步重新手动做一下