一行拆成两行

shufeabb · 发表于 2023-9-7 20:51

一行拆成两行.7z (8.93 KB, 下载次数: 21)

quqiyuan · 发表于 2023-9-7 22:55

let
源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
标题 = Table.FromColumns(List.Transform(Table.ColumnNames(源),each Text.Split(_,"/"))),
数据=Table.DemoteHeaders(源),
结果=标题&Table.Skip(数据)
in
结果

复制代码

如果你有需要，请提升标题。

gxg1000 · 发表于 2023-9-8 10:03

let
源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
拆行 = #table(List.Transform(Table.ColumnNames(源),each Text.Combine(Text.Split(_,"/"),"#(lf)")),Table.ToRows(源))
in
拆行

gxg1000 · 发表于 2023-9-8 10:14

用替换的方法

hbzql · 发表于 2023-9-8 10:57

let
源 = Excel.CurrentWorkbook(){[Name="表1"]}[Content],
自定义1 = [a=Table.ToRows(源),b=List.Zip(List.Transform(a{0},each Text.Split(_,"/"))),c=Table.FromRows(b&{a{1}})][c]
in
自定义1

复制代码

		自动登录	找回密码
密码			免费注册

[求助] 一行拆成两行

评分