引用:
立場上、詳細エディターに複雑なコードを書くことができない
意味不明なので無視します。時間の無駄なので反論はしないでください。
統合したい[月ごとのブック]がフォルダー
E:\office\Excel\ExcelVBA\11 にあって、
フォルダー内にはその他の余計なブックがない場合。詳細エディターに
let
ソース = Folder.Files("
E:\office\Excel\ExcelVBA\11"),
flt = Table.SelectRows(ソース, each [Attributes]?[Hidden]? <> true),
add = Table.AddColumn(flt, "変換", each
Excel.Workbook(_[Content], null){0}[Data][Column1]),
tbl = Table.FromColumns(add[変換]),
prh = Table.PromoteHeaders(tbl, [PromoteAllScalars=true])
in
prh