Passer d'une cellule MM-DD-YYYY à un format DATE

Bonjour,

j'ai une cellule sous format MM-DD-YYYY j'ai fait l'extraction du mois par la fonction =GAUCHE(A1;CHERCHE("-";A1)-1) et je veux avoir la cellule sous format DATE

j'explique: j'ai une cellule sous format Oct-27-2017 quand j'applique la fonction GAUCHE(A1;CHERCHE("-";A1)-1) j'obtiens le mois c'est à dire Oct, j'ai essayé avec la fonction SUBSTITUT (cellule contenant Oct-27-2017; cellule contenant Oct, REHCERCHEV)) mais ca na pa marhé

Merci

Bonjour,

Un exemple dans le fichier joint.

Cdlt.

8traderas.xlsx (14.04 Ko)

Bonjour

mettre la function Vers_date dans un module & dans la cellule =Vers_date(A2)

Public Function Vers_date(Text)
moi = Array("JAN", "FEB", "MAR", "APR", "MAY", "JUN", "JUL", "AUG", "SEP", "OCT", "NOV", "DEC")
Jour = Split(Text, "-")(1)
Mois = Split(Text, "-")(0)
An = Split(Text, "-")(2)
    For i = 0 To UBound(moi)
        If moi(i) = Mois Then Tmois = i + 1: Exit For
    Next i
Vers_date = DateSerial(An, Tmois, Jour)
End Function

A+

Maurice

Bonjour à tous

Une formule à tester :

=STXT(A1;5;2)&"/"&GAUCHE(A1;3)& "/"&DROITE(A1;4)

Bye !

Merci à vous tous, toutes les solution sont bonnes,

Rechercher des sujets similaires à "passer yyyy format date"