let
Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
#"Type modifié" = Table.TransformColumnTypes(Source,{{"Date", type date}, {"Valeur", Int64.Type}}),
#"Index ajouté" = Table.AddIndexColumn(#"Type modifié", "Index", 1, 1, Int64.Type),
#"Personnalisée ajoutée" = Table.AddColumn(#"Index ajouté", "Moyenne Semaine", each List.Average(List.Range(Source[Valeur],[Index]-7,7))),
#"Autres colonnes supprimées" = Table.SelectColumns(#"Personnalisée ajoutée",{"Moyenne Semaine"}),
#"Type modifié1" = Table.TransformColumnTypes(#"Autres colonnes supprimées",{{"Moyenne Semaine", type number}}),
#"Erreurs remplacées" = Table.ReplaceErrorValues(#"Type modifié1", {{"Moyenne Semaine", null}})
in
#"Erreurs remplacées"