Microsoft 365 Dates US impossibles a transformer en date FR

[GADENSEB]

Bonjour le forum,
j'essaye de transformer des date US (colonne A) en date FR (colonne C)
mais impossible, j'ai essayé :
- =texte ....
- En vba CDATE....

Ca ne passe pas

qqn aurait une idée ?

En vous remerciant
Bonne journée

Sébastien

 

[sousou]

bonjour
=DATE(STXT([@[Order Date]];7;4);STXT([@[Order Date]];1;2);STXT([@[Order Date]];4;2))
Transforme en vrai date excel.
Mettre le format des cellules à son choix

 

[Phil69970]

Bonjour @GADENSEB

Sur une astuce de Patrick
Je te propose ceci :

Sub MadateFR()
For i = 2 To Range("B" & Rows.Count).End(xlUp).Row
    Cells(i, 2) = Trim(Format(Cells(i, 2), "mm/dd/yyyy"))
Next i
End Sub

*Macro testé et elle redresse la colonne B en date FR

*Merci de ton retour

@Phil69970

 

[patricktoulon]

bonjour
c'est normal tes date heures en "A" sont du texte format" standard" donc tu ne fait que prendre les 10 premiers caracteres
il te faut non seulement prendre les 10 permiers caracteres mais le transformer en date

met ça en B2 =DATE(STXT(A2;7;4);STXT(A2;1;2);STXT(A2;4;2))
c'est un TS les autres suivront la demarche

 

[sousou]

re
avec une fonction
Function madate(x)
With x
an = Mid(.Value, 7, 4)
mois = Mid(.Value, 1, 2)
jour = Mid(.Value, 4, 2)
madate = CDate(jour & "/" & mois & "/" & an)

End With

End Function

 

[GADENSEB]

Hello !!!
un grand merci à vous
J'ai testé les différentes versions
parfait !

Bonne soirée
Seb