let
Source = Table.FromRows(Json.Document(Binary.Decompress(Binary.FromText("i45W8vP3VdJR8g0NijcwxGAY4WYYK8XqRCv5Ooa4Bnk6hkYAhZ1cQ/z9gLRnsL+Po18IkBXg4xgS5IoiBFMEoUFGuAY4egYHu4YGAUWNDICEIZiAMYyhRGwsAA==", BinaryEncoding.Base64), Compression.Deflate)), let _t = ((type nullable text) meta [Serialized.Text = true]) in type table [Colonne1 = _t, Colonne2 = _t, Colonne3 = _t, Colonne4 = _t, Colonne5 = _t, Colonne6 = _t, Colonne7 = _t]),
listColsMurs = List.RemoveFirstN(Table.ColumnNames(Source),1),
PivotData = Table.FromRecords(List.Transform(listColsMurs, each let colValues = Table.Column(Source, _) in [NOM=colValues{0}, MATERIAUX=colValues{1}, EPAISSEUR=colValues{2}])),
GroupByMur = Table.Group(PivotData, {"NOM"}, {{"Data", each _, type table [NOM=text, MATERIAUX=text, EPAISSEUR=number]}}),
AddColumnFinalData = Table.AddColumn(GroupByMur, "FinalData", each {{[NOM]}, [Data][MATERIAUX], [Data][EPAISSEUR]}, type list),
SelectColumnFinalData = Table.SelectColumns(AddColumnFinalData,{"FinalData"}),
ExpandRowsFinalData = Table.ExpandListColumn(SelectColumnFinalData, "FinalData"),
listFinalColumns = List.Buffer(List.Transform({1..List.Max(List.Transform(ExpandRowsFinalData[FinalData], List.Count))}, each "Column" & Text.From(_))),
TransformInRecords = Table.TransformColumns(ExpandRowsFinalData, {{"FinalData", each Record.FromList(_, List.FirstN(listFinalColumns, List.Count(_))), type record}}),
DevelopRecords = Table.ExpandRecordColumn(TransformInRecords, "FinalData", listFinalColumns, listFinalColumns)
in
DevelopRecords