Hey,
Une proposition
@JFL si tu passes par là, je suis fier de cette requête, je commence à mettre en pratique ;)
@+
EDIT : le code pour ceux qui ne peuvent pas ouvrir le fichier
let
Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
Type = Table.TransformColumnTypes(Source,{{"Date de péremption ", type date}}),
GroupBy = Table.Group(Type, {"Date de péremption "}, {
{"New", each Text.Combine(_[Nom]," ") },
{"tbl2", each _}}),
Sort = Table.Sort(GroupBy,{{"Date de péremption ", Order.Ascending}}),
Index0 = Table.AddIndexColumn(Sort, "Index", 0, 1, Int64.Type),
AddAncienneValeur = Table.AddColumn(Index0, "Ancienne valeur", each try Sort{[Index]-1}[New] otherwise null),
AddNouvelleValeur = Table.AddColumn(AddAncienneValeur, "Nouvelle valeur", each
try
let
a = AddAncienneValeur{[Index]-1}[tbl2],
b = List.Difference(a[Type],[tbl2][Type]),
d = Table.RowCount(a)
in [New] & " "& Text.Combine(
Table.Skip(
List.Accumulate(b,a,(s,c) => Table.Combine({s,Table.SelectRows(a, each [Type] = c)})),
d)[Nom]
," ")
otherwise [New]),
ColSupp = Table.RemoveColumns(AddNouvelleValeur,{"Index", "New", "tbl2"})
in
ColSupp