如何通过PQ把表1变成表2？

10317101750306.zip (8.83 KB, 下载次数: 0)

2020-9-25 02:05 上传

点击文件名下载附件

有没有大侠给一个思路？谢谢

关注，期待

let
  源 = Excel.CurrentWorkbook(){[Name="表2"]}[Content],
  转置表 = Table.Combine(List.Transform(Table.Split(Table.Transpose(源),2),each Table.PromoteHeaders(Table.Transpose(_)))),
  逆透视的其他列 = Table.UnpivotOtherColumns(转置表, {"姓名"}, "属性", "值"),
  已透视列 = Table.Pivot(逆透视的其他列, List.Distinct(逆透视的其他列[属性]), "属性", "值")
in
  已透视列
10317101750307.zip (17.88 KB, 下载次数: 0)

2020-9-25 02:22 上传

点击文件名下载附件

自问自答吧。
用了一个合并查询的笨办法。

10317101750308.zip (19.06 KB, 下载次数: 0)

2020-9-25 02:28 上传

点击文件名下载附件

1. let
   
2. 
     源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
   
3. 
     更改的类型 = Table.TransformColumnTypes(源,{{"姓名", type text}, {"语文", Int64.Type}, {"姓名2", type text}, {"数学", Int64.Type}, {"姓名3", type text}, {"英文", Int64.Type}}),
   
4. 
     z=Table.SelectColumns(更改的类型,{"姓名","语文"}),
   
5. 
     a=Table.SelectColumns(更改的类型,{"姓名2","数学"}),
   
6. 
     b=Table.SelectColumns(更改的类型,{"姓名3","英文"}),
   
7. 
     h=Table.FromList(List.Distinct(List.Combine({更改的类型[姓名],更改的类型[姓名2],更改的类型[姓名3]})),null,{"姓名"}),
   
8. 
     i=Table.ExpandTableColumn(Table.NestedJoin(h, {"姓名"}, z, {"姓名"}, "a", JoinKind.FullOuter), "a", {"语文"}, {"语文"}),
   
9. 
     l=Table.ExpandTableColumn(Table.NestedJoin(i, {"姓名"}, a, {"姓名2"}, "a", JoinKind.FullOuter), "a", {"数学"}, {"数学"}),
   
10. 
      m=Table.ExpandTableColumn(Table.NestedJoin(l, {"姓名"}, b, {"姓名3"}, "a", JoinKind.FullOuter), "a", {"英文"}, {"英文"}),
    
11. 
      排序的行 = Table.Sort(m,{{"姓名", Order.Ascending}})
    
12. 
    
    
13. 
    in
    
14. 
      排序的行
    
15. 
    

复制代码

let
  源 = Excel.CurrentWorkbook(){[Name="表2"]}[Content],
  转置表 = Table.Combine(List.Trans ...

，谢谢大神

let
  源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
  降级的标题 = Table.DemoteHeaders(源),
  纵向合并 = Table.FromColumns(List.Transform({1,0},each List.Combine(List.Alternate(Table.ToColumns(降级的标题),1,1,_))),{"姓名","分数"}),
  加科目 = Table.AddColumn(纵向合并,"科目",each if [分数] is number then null else [分数]),
  填充 = Table.FillDown(加科目,{"科目"}),
  筛选 = Table.SelectRows(填充,each [分数] is number ),
  透视 = Table.Pivot(筛选,{"语文","数学","英文"},"科目","分数")
in
  透视

好像还行，不算复杂