Convertir un nombre en 6 chiffres a une date
Résolu/Fermé
A voir également:
- Convertir un nombre en 6 chiffres a une date
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Convertir youtube en mp3 avec audacity - Guide
- Convertir epub en kindle - Guide
- Faites afficher avec un fond coloré les cellules qui contiennent une valeur comprise entre 250 et 350. quel nombre est dessiné en surbrillance ? ✓ - Forum Excel
2 réponses
pilas31
Messages postés
1825
Date d'inscription
vendredi 5 septembre 2008
Statut
Contributeur
Dernière intervention
24 avril 2020
644
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
1825
Date d'inscription
vendredi 5 septembre 2008
Statut
Contributeur
Dernière intervention
24 avril 2020
644
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,