|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
let
源 = Excel.CurrentWorkbook(){[Name="表2"]}[Content],
转置表 = Table.Transpose(源),
分组的行 = Table.Group(转置表, {"Column1"}, {{"分组", (x)=> List.Combine(Table.ToRows(x))}})[分组],
转表 = Table.FromColumns( 分组的行),
提升标题 = Table.PromoteHeaders(转表, [PromoteAllScalars=true]),
筛选的行 = Table.SelectRows(提升标题, each ([A] <> "A") and ([B] <> "B") and ([C] <> "C") )
in
筛选的行
我尽量分步做的:
1.转置表(如果标题是第一行请先降标题)
2.分组,同时在内部将分组的表转成list,然后用list.combine连接
3.把list.combine的连接结果列单独拿出来转换成表
4.筛选多余的标题即可 |
评分
-
1
查看全部评分
-
|