此题有没更简单的解法？

cnmlgb9998

这是我用 PQ 做的。但是感觉 有点绕，请大神帮我看看，有没更好的解法？



如图。文件在下面。

祝洪忠-

6-17-1.rar (52.51 KB, 下载次数: 5)

2024-6-17 20:57 上传

点击文件名下载附件

cnmlgb9998

祝洪忠- 发表于 2024-6-17 20:57

谢谢大佬。 这题要求用 PQ，不用公式 或 VB。谢谢！

sm629

试试：

1. let
   
2.     源 = Excel.CurrentWorkbook(){[Name = "表1"]}[Content],
   
3.     a = Table.AddColumn(源, "区域", each "区域"&Text.Upper(Text.Start([型号],1))),
   
4.     b = Table.Combine(Table.Group(a, {"品名", "区域"}, {"a", each Table.AddIndexColumn(_,"id",1,1)})[a]),
   
5.     c = Table.Pivot(b, List.Distinct(b[区域]), "区域", "型号")
   
6. in
   
7.     c

复制代码

cnmlgb9998

sm629 发表于 2024-6-18 15:58
试试：

厉害！！！！！！！！！！！！！！！

渡渡orz

1. let
   
2.       源 = Excel.CurrentWorkbook(){[Name = "表1"]}[Content],
   
3.       add = Table.AddColumn(源, "自定义", each "区域" & Text.Upper(Text.Start([型号], 1))),
   
4.       lst = List.Sort(List.Distinct(add[自定义])),
   
5.       pivot = Table.Pivot(add,lst, "自定义", "型号", each _),
   
6.       combine = Table.CombineColumns(pivot,lst,each Table.FromColumns(_,lst),"a"),
   
7.       展开 = Table.ExpandTableColumn(combine,"a",lst)
   
8. in
   
9.       展开

复制代码

另一种方法，谈不上简单

飞天篮球猪

pq可以用list.accumulate一条出。
以下是其它软件实现的：

十三不是什三

Fyi：两次分组得性能会比Table.Pivot透视速度要快。

1. = let Grouped =  Table.Group(Source, "品名", {"t", each let add = Table.AddColumn(_, "区域",(x)=> "区域" & Text.Upper(Text.At(x[型号], 0))),
   
2.                                                             grp = Table.Buffer(Table.Group(add, "区域", {"r", each [型号]}))
   
3.                                                         in  Table.FromRows(List.Zip(grp[r]), grp[区域])}),
   
4.       FromMany = Table.FromPartitions("品名", Table.ToRows(Grouped))
   
5.   in  Table.ReorderColumns(FromMany,{"品名"} & List.Sort(List.RemoveLastN(Table.ColumnNames(FromMany), 1)))

复制代码

飞天篮球猪

十三不是什三 发表于 2024-6-20 09:18
Fyi：两次分组得性能会比Table.Pivot透视速度要快。

十三先生666,下面是一样的，效率不影响。
fromrows(list1.zip,list2) --》 fromcolumns(list1.list2)
"品名"&sort--》list.sort(columnnames,{each _<>"品名",each _})

pxy0409

sm629 发表于 2024-6-18 15:58
试试：

值得学习!
Table.Group(a, {"品名", "区域"}, {"a", each Table.AddIndexColumn(_,"id",1,1)})