Pour le plaisir.....
Une autre proposition Power Query :
let
Source = Excel.CurrentWorkbook(){[Name="Tableau5"]}[Content],
#"Texte extrait après le délimiteur" = Table.TransformColumns(Source, {{"Date", each Text.AfterDelimiter(_, " "), type text}}),
#"Texte extrait avant le délimiteur" = Table.TransformColumns(#"Texte extrait après le délimiteur", {{"Date", each Text.BeforeDelimiter(_, " ", {1, RelativePosition.FromEnd}), type text}}),
#"Type modifié" = Table.TransformColumnTypes(#"Texte extrait avant le délimiteur",{{"Date", type date}})
in
#"Type modifié"