let
Source = Excel.CurrentWorkbook(){[Name="Tableau1"]}[Content],
#"Espaces supprimés" = Table.TransformColumns(Table.TransformColumnTypes(Source, {{"Format actuel", type text}}, "fr-FR"),{{"Format actuel", Text.Trim, type text}}),
#"Valeur remplacée" = Table.ReplaceValue(#"Espaces supprimés",".","",Replacer.ReplaceText,{"Format actuel"}),
#"Type modifié" = Table.TransformColumnTypes(#"Valeur remplacée",{{"Format actuel", Int64.Type}})
in
#"Type modifié"