let
Source = Csv.Document(File.Contents("C:\facturation.txt"),[Delimiter=",", Columns=1, Encoding=65001, QuoteStyle=QuoteStyle.None]),
Process = let x =Table.AddColumn(Source, "Custom", (x)=> List.Select(Text.SplitAny(x[Column1], " "),
each List.ContainsAny(Text.ToList(_), {"0".."9" }) and not List.Contains(Text.ToList(_), "-")))[Custom]
in Table.FromRows(List.Select(x, each List.Count(_) = 2), {"Date","x"}),
Result = Table.Group(Process, {"Date"}, {{"Somme Montant", each List.Sum(List.Transform([x], Number.FromText))}})
in
Result