Conversion fichier texte en date

Bonjour,

j'ai un problème avec excel, je voudrais qu'excel reconnaisse "Janvier 01 2019" en date et je ne trouve pas comment faire.

Merci pour votre aide.

cdt

Arnaud

Bonjour

A tester avec la date à modifier en A1

=DATE(DROITE(A1;4);INDEX({1;2;3;4;5;6;7;8;9;10;11;12};EQUIV(STXT(A1;1;TROUVE(" ";A1)-1);{"janvier";"février";"mars";"avril";"mai";"juin";"juillet";"aout";"septembre";"octobre";"novembre";"décembre"};0));STXT(A1;TROUVE(" ";A1)+1;2))

Bonjour à vous deux,

à mettre dans un module vba :

Function ConvTextDate(texte As String)
    Dim mois As String, jour As String, annee As String
    Dim ladate As Date

    mois = UCase(Left(texte, InStr(1, texte, " ") - 1))
    jour = Mid(texte, InStr(1, texte, " ") + 1, 2)
    annee = Right(texte, 4)

    ladate = CDate(jour & "/" & mois & "/" & annee)
    ConvTextDate = ladate
End Function

Utilisation :

dans une cellule Excel à mettre

=ConvTextDate(lacelluleouyaletexte)

Joyeuses fêtes

Bonjour,

autre formule,

=DATE(DROITE(A1;NBCAR(A1)-TROUVE(" ";A1;TROUVE(" ";A1)+1));MOIS(1&(GAUCHE(A1;TROUVE(" ";A1))));STXT(A1;NBCAR(GAUCHE(A1;TROUVE(" ";A1)))+2;2))