Convertir un nombre en 6 chiffres a une date

Résolu/Fermé
Salim159 - 21 avril 2015 à 11:14
 Salimi159 - 26 avril 2015 à 18:28
Bonjour,


J'ai une colonne de centaines de nombres de 6 chiffres comme par exemple : 020415 que j'ai obtenu par convertir un fichier pdf en excel.
Je veux un astuce qui me permet de convertir ces chiffres en date sous la forme 02/04/2015
A voir également:

2 réponses

pilas31 Messages postés 1825 Date d'inscription vendredi 5 septembre 2008 Statut Contributeur Dernière intervention 24 avril 2020 643
21 avril 2015 à 13:10
Re bonjour

et en VBA cela peut donner ceci :
Sub ChaineVersDate()
    Dim ligne As Integer
    Dim valeur As String
    For ligne = 1 To 200 ' adapter les bornes
        valeur = Cells(ligne, 1) ' adapter le numéro de colonne
        Cells(ligne, 1) = DateSerial("20" & Right(valeur, 2), Mid(valeur, 3, 2), Left(valeur, 2))
    Next ligne
End Sub

1
pilas31 Messages postés 1825 Date d'inscription vendredi 5 septembre 2008 Statut Contributeur Dernière intervention 24 avril 2020 643
Modifié par pilas31 le 21/04/2015 à 12:00
Bonjour,

si par exemple les 6 chiffres sont en A1:
la formule =DATE("20"&DROITE(A1;2);STXT(A1;3;2);GAUCHE(A1;2))
le transforme en date
A condition que l'année tronquée soit bien 2015 est que l'ordre soit
jjmmaa

la formule est à recopier ver le bas.
Cordialement,
0
Votre réponse m'a été très utile. La formule marche même si l'année n'est pas 2015. Toutefois, il m'a fallu quelques modifications lorsque le chiffre est condtitué de 5 éléments (comme 5022015 =====> 05/02/2015).
Merci
0