数据源中每2行数据进行转置

kenese

如题， 如何将数据源中的A~~F列的数据， 转置成H~~N 列的数据 ？？

cnmlgb9998

是这个效果吗？？？？？？？？？？？？



基本操作。

minchar

let
    源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
    更改的类型 = Table.TransformColumnTypes(源,{{"通行时间", type datetime}}),
    合并时间与读头 = Table.CombineColumnsToRecord(更改的类型,"值",{"通行时间","读头编号"}),
    分组透视再合并 = Table.Combine(List.Transform( Table.Split( 合并时间与读头,2),each Table.Pivot(_, {"进","出"}, "进出标志", "值"))),
    展开的出 = Table.ExpandRecordColumn(分组透视再合并, "出", {"通行时间", "读头编号"}, {"通行时间", "读头编号"}),
    展开的进 = Table.ExpandRecordColumn(展开的出, "进", {"通行时间", "读头编号"}, {"通行时间.1", "读头编号.1"})
in
    展开的进

kenese

minchar 发表于 2024-11-2 19:52
let
    源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
    更改的类型 = Table.TransformColum ...

出来的结果有错误以及漏数据 耶

tcdatongye

1. let
   
2.     源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
   
3.     f=(tab)=>
   
4.     [ a = Table.AddColumn(tab, "a", each [进出标志]&"1"),
   
5.       b = Table.Pivot(a, List.Distinct(a[进出标志]), "进出标志", "通行时间"),
   
6.       c = Table.Pivot(b, List.Distinct(b[a]), "a", "读头编号"),
   
7.       d = Table.Group(c, {"工号", "Day"}, {{"出", each List.Max([出]), type nullable datetime}, {"读头编号1", each List.Max([出1])}, {"进", each List.Max([进]), type nullable datetime}, {"读头编号2", each List.Max([进1])}, {"类型", each List.Max([类型])}})
   
8.     ][d],
   
9.     s=Table.Combine(List.Transform(Table.Split(源,2),(x)=>f(x)))
   
10. in
    
11.     s

复制代码

adfs945

厉害了，学习到了。

00JTR00

点点点，不写代码

土匪远

主要在重排，其他手动操作。

let
    源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
    重排 = Table.FromColumns(Table.ToColumns(Table.SelectRows(源,each [读头编号]=2))& Table.ToColumns(Table.SelectRows(源,each [读头编号]=3))),
    重命名 = Table.RenameColumns(重排,{{"Column1", "工号"}, {"Column2", "Day"}, {"Column3", "出"}, {"Column4", "读写编码1"}, {"Column9", "进"}, {"Column10", "读写编码2"}, {"Column11", "类型"}}),
    删除的列 = Table.RemoveColumns(重命名,{"Column5", "Column6", "Column7", "Column8", "Column12"})
in
    删除的列