Bonjour à tous de nouveau !
Une approche liée à cette précision :
let
Source = Excel.CurrentWorkbook(){[Name="BASE"]}[Content],
SelCol = List.Select(Table.ColumnNames(Source), each Text.StartsWith(_,"Réaj") ),
Traitt = Table.AddColumn(Source, "MT", each let
reaj= Record.SelectFields(_,SelCol),
pr=List.RemoveNulls(Record.FieldValues(reaj)){0},
nre= Record.FieldNames (reaj){List.PositionOf(Record.FieldValues(reaj),pr)}
in Record.TransformFields(_,{nre,each null})&[MONTANT INITIAL=pr]),
Réorg = Table.ReorderColumns (Table.FromRecords(Traitt[MT]),List.InsertRange(Table.ColumnNames(Source),4,{"MONTANT INITIAL"}))
in
Réorg