将列转换为单元格字符串 Power Query

Vic*_*tor 1 excel powerquery

我需要将 Power Query 中列的所有值放入一个以逗号分隔的 1 单元格字符串中,如下例所示:

在此输入图像描述

为此,我有以下代码:

let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Transposed Table" = Table.Transpose(Source),
    #"Merged Columns" = Table.CombineColumns(#"Transposed Table",{"Column1", "Column2", "Column3"},Combiner.CombineTextByDelimiter(",", QuoteStyle.None),"Merged"),
    #"KeepString" = #"Merged Columns"[Merged]{0}
in
    #"KeepString"
Run Code Online (Sandbox Code Playgroud)

这段代码的问题在于它假设总是有 3 列,但情况并非总是如此。如何将所有列(无论有多少列)合并为一列?

Ale*_*SFT 6

您可以通过以下方式执行此操作List.Accumulate

let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    KeepString = List.Accumulate(Source[User], "", (state, current) => if state = "" then current else state & "," & current)
in
    KeepString
Run Code Online (Sandbox Code Playgroud)

您还可以使用Table.ColumnNames来获取所有列名称的列表。您可以将其传递到Table.CombineColumns,因此修改后的解决方案将是:

let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Transposed Table" = Table.Transpose(Source),
    #"Merged Columns" = Table.CombineColumns(#"Transposed Table", Table.ColumnNames(#"Transposed Table"),Combiner.CombineTextByDelimiter(",", QuoteStyle.None),"Merged"),
    #"KeepString" = #"Merged Columns"[Merged]{0}
in
    #"KeepString"
Run Code Online (Sandbox Code Playgroud)