Dates à transformer

Fermé
none123 - 19 févr. 2017 à 20:56
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 - 20 févr. 2017 à 00:32
Bonjour,

J'ai présentement une série de donnée où les dates sont écrites comme ceci: 20100101. Je voudrais savoir s'il y a un moyen de transformer ce nombre en vrai date dans le style de 2010-01-01. J'ai plus de 1500 données à changer donc le faire à la main n'est pas une bonne solution.

Je vous remercie pour vos futures réponses :)

4 réponses

Mike-31 Messages postés 18384 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 9 avril 2025 5 127
Modifié par Mike-31 le 19/02/2017 à 21:35
Bonsoir,

plusieurs possibilités,
sélectionne ta plage à traiter et clic droit sur la sélection/Format de cellule/onglet Nombre/Personnalisée
et crée ce format
0000"-"00"-"00 ou encore ####"-"##"-"##
et OK

ou dans une autre colonne avec cette formule pour une saisie en A2 et incrémenter vers le bas
=GAUCHE(A2;4)&"-"&GAUCHE(DROITE(A2;4);2)&"-"&DROITE(A2;2)

puis sélectionner la plage modifiée/clic droit Copier/clic droit sur la même sélection Coller (la formule sera remplacée par des valeurs fixes
A+
Mike-31

Pas savoir n'est pas un échec, l'échec est le refus d'apprendre.
0
julia Namor Messages postés 524 Date d'inscription jeudi 27 mars 2014 Statut Membre Dernière intervention 13 janvier 2024 33
19 févr. 2017 à 21:54
Bonsoir chers tous

Une possibilité en vba

Sub Format_date()
Application.ScreenUpdating = False
Dim cell As Range
For Each cell In Sheets("Feuil1").Range("A1:A10") 'PLAGE A ADAPTER
If Not WorksheetFunction.IsText(cell.Value) Then
cell.Value = Left(cell.Value, 4) & "-" & Mid(cell.Value, 5, 2) & "-" & Mid(cell.Value, 7, 2)
cell.NumberFormat = "yyyy-mm-dd"
Else
Cancel = True
End If
Next
Application.ScreenUpdating = False
End Sub


Cdt
0
Merci beaucoup à vous deux mais j'ai trouvé une autre solution:

J'ai converti ma cellule en largeur fixe ce qui m'a donné 3 nouvelles cellules et j'ai ensuite utiliser la fonction DATE et sélectionner ces 3 dernières. Ça prend plus de place c'est certain mais c'est tout de même efficace ;)
0
eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 257
20 févr. 2017 à 00:32
Bonjour,

moins de place et plus rapide :
'Données / Convertir', à l'étape 3 choisir Date et AMJ
eric
0