Complétement grillé par JFL qui est trop rapide pour moi :)
Je donne quand même une solution qui s'en rapproche beaucoup.
let
Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
#"Liste des voyageurs" = Table.AddColumn(Source, "ListeVoyageurs", each List.Transform(Text.Split([VOYAGEURS], ","), Text.Trim)),
#"Calcul du prix individuel" = Table.AddColumn(#"Liste des voyageurs", "Prix individuel", each Number.Round([TARIF TTC] / List.Count([ListeVoyageurs]),2), type number),
#"Développement de la liste" = Table.ExpandListColumn(#"Calcul du prix individuel", "ListeVoyageurs"),
Sortie = Table.RemoveColumns(#"Développement de la liste",{"LIEUX", "TARIF TTC", "VOYAGEURS"})
in
Sortie