Convertir un nombre en 6 chiffres a une date
Résolu/Fermé
A voir également:
- Convertir un nombre en 6 chiffres a une date
- Convertir youtube en mp3 tuto - Guide
- Convertir une note sur 20 ✓ - Forum Bureautique
- Iphone 14 date de sortie - Guide
- Convertir pdf en word excel gratuit - Guide
- Nombre de combinaison possible avec 3 chiffres ✓ - Forum Programmation
2 réponses
pilas31
Messages postés
1823
Date d'inscription
vendredi 5 septembre 2008
Statut
Contributeur
Dernière intervention
24 avril 2020
636
21 avril 2015 à 13:10
21 avril 2015 à 13:10
Re bonjour
et en VBA cela peut donner ceci :
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
pilas31
Messages postés
1823
Date d'inscription
vendredi 5 septembre 2008
Statut
Contributeur
Dernière intervention
24 avril 2020
636
Modifié par pilas31 le 21/04/2015 à 12:00
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,
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,