有两行的逆透视

shufeabb

两个行的逆透视.rar (11.29 KB, 下载次数: 35)

2020-12-31 09:04 上传

点击文件名下载附件

deadzlq

PowerQuery参考解法（常规的基操套路）

wdx223

adai2014

合并“前两列”——选合并列、转置——合并“转置后前两列”——再转置——将第一行用作标题——选第一列逆透视其他列——拆分列

shaowu459

仅供参考使用。。。数据多了效率非常低啊。。。

飞天篮球猪

凑个热闹，闲着也是闲着....
百万行15秒，lol....

1. = let a = List.Transform(Table.ToColumns(Table.FirstN(源,2)),each Text.Combine(_,"#(lf)")),
   
2.       b = Table.Skip(Table.Transpose(Table.Transpose(源),a),2),
   
3.       c = Table.Unpivot(b,List.Skip(a,2),"y","金额"),
   
4.       d = Table.SplitColumn(c,"y",Lines.FromText,{"描述","年份"})
   
5.    in d

复制代码

xiaolege

这一个个M函数看着都晕，你们怎么记得那么多的。。。太强了

shaowu459

飞天篮球猪 发表于 2020-12-31 17:05
凑个热闹，闲着也是闲着....
百万行15秒，lol....

我刚才测试了下，5楼的代码其他不变，把Table.ToRows这部分buffer一下，加在出101万行结果，时间是23秒，还可以接受

ThxAlot

也来凑个热闹

1. let
   
2.     Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("dY+/bsIwEMZfxcp8keyL/44ImDt2iDKlDCykonTozgBLR5YidfJSMTC4Qk15nCZk4xVq1yCBVKST7nff+b7z5XmSQAh23xveXeX+RS4gT3plWT1PZqRfPYx841wORk/ldPw4G1cTryJFljI80cv0PymYSUZpCK8e3lz7an/qutnZtF1vmvWWpKR5rwPvbPc594+IQZASSUAG1CgQnMVKSUDkp46hGpTS5HIJ3lzSOts5FyaFBq7on4k0GiSPrBmgjt5aUsiEunLObn//yx2+F41dkeN+wbJu9XHcL4ONAoXxDMOAny/iILWIKISXPRfFLw==", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [Column1 = _t, Column2 = _t, Column3 = _t, Column4 = _t, Column5 = _t, Column6 = _t]),
   
3. 
   
4.     #"All Rows" = Table.ToRows(Source),
   
5.     #"New Headers" = List.Transform(List.Zip(List.FirstN(#"All Rows", 2)), each Text.Trim(Text.Combine(_, "#(tab)"))),
   
6.     #"New Table" = Table.PromoteHeaders(Table.FromRows({#"New Headers"} & List.Skip(#"All Rows", 2)), [PromoteAllScalars=true]),
   
7.     #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"New Table", {"Account Code", "Account Description"}, "Attribute", "Amount"),
   
8.     #"Split Column by Delimiter" = Table.SplitColumn(#"Unpivoted Other Columns", "Attribute", Splitter.SplitTextByDelimiter("#(tab)", QuoteStyle.Csv), {"Attribute.1", "Attribute.2"})
   
9. in
   
10.     #"Split Column by Delimiter"

复制代码

ThxAlot

飞天篮球猪 发表于 2020-12-31 17:05
凑个热闹，闲着也是闲着....
百万行15秒，lol....

看官方的说明文档，PQ最多支持2^14列；看来中间步骤（Table.Transpose(Table.Transpose(源),a)）的table所包含的列数量是可以超过这个限制的。