Convertir textes avec longueurs différentes au format date

[Caribou]

Bonjour à tous,
Je cherche à convertir des données au format texte en date.
Mon pb est que les données des cellules n'ont pas toujours la même longueur.
En effet, j'ai par exemple :
10/15/2013
8/30/2015
10/6/2014
(mois/jour/année mais au format texte donc)
Ma formule =DATE(DROITE(A1;4);STXT(A1;4;2);GAUCHE(A1;2)) marche avec le premier exemple mais pas avec les 2 autres puisque le jour ou le mois n'ont plus qu'un chiffre.
Pourriez-vous m'aider s'il vous plaît avec une formule qui englobe les 3 cas de figures?
Un grand merci d'avance

 

[Dranreb]

Bonsoir.
Essayez =DATEVAL(A1)

 

[mapomme]

Bonjour,

J'ai considéré que c’était un copier/coller ou une importation de dates au format américain (mois/jour/année). Donc soit Excel a transformé la valeur copiée ou importée en texte (si la valeur ne peut pas représenter une date au format français), soit l'a transformé en date (mais avec jour et mois inversés).
Si l'importation a conservé le format texte pour toutes les dates, ça doit fonctionner aussi.
Voir le fichier joint et la formule en B1 à copier vers le bas.

 

[Staple1600]

Bonjour le fil,

Sans formules, sans macros mais avec Données/Convertir ça devrait le faire aussi
(en formatant Date en MJA à l'étape 3)

Ci-dessous la traduction VBA de ce Données/Convertir

Sub Macro1()
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
        :=Array(1, 3), TrailingMinusNumbers:=True
End Sub

PS: J'ai testé en copiant en Texte unicode les trois dates du message#1
=> test concluant.

 

[mapomme]

Salut @Staple1600 🙂 😉

Moi j'aurais fait comme toi mais le quadrupède ruminant 😀demandait une formule...

 

[Staple1600]

Bonjour ma pomme

Peut-être que le sus-dit cervidé ignore cette fonctionnalité d'Excel.
Dorénavant il a le choix:
Formuler
Macroter
ou honorer sa souris de douces caresses pour dialoguer avec L'Assistant
(Cette troisième voie ayant l'avantage d'en plus d'améliorer sa dextérité digitale, qui n'est déjà pas bien grande pour un cervidé 😉)

 

[Staple1600]

Re,

Je me permets de digresser
(c'est un jour férié, on a du temps libre et la question est résolue)
Il y a ceux qui titillent leur souris et il y a les autres, ceux (les badass) qui ne jurent que par leurs claviers
Alors pour ne pas les oublier, et pour corner un peu plus leurs gros doigts 😉

CTRL+FLECHE (prés de Verr NUM) CTRL+A ALT+é ALT+O ALT+S ENTER ENTER ALT+D TAB (choisir le format avec les flèche Haut/Bas) ENTER ENTER

PS: dextérité digitale (il y a mot de trop, non?)
C'est un pléonasme (ou un truc du genre)
On doit dire : améliorer sa dextérité
(qui pour le coup est forcément digitale) 😉

 

[Caribou]

Bonsoir.
Essayez =DATEVAL(A1)

Merci Dranreb. J'avais essayé aussi mais ça ne fonctionne pas. Pourquoi ? Mystère (pour moi en tout cas 🙂)
Bonne journée !

 

[Caribou]

Bonjour,

J'ai considéré que c’était un copier/coller ou une importation de dates au format américain (mois/jour/année). Donc soit Excel a transformé la valeur copiée ou importée en texte (si la valeur ne peut pas représenter une date au format français), soit l'a transformé en date (mais avec jour et mois inversés).
Si l'importation a conservé le format texte pour toutes les dates, ça doit fonctionner aussi.
Voir le fichier joint et la formule en B1 à copier vers le bas.

Allo mapomme.
Importation en effet 🙂 Ça marche super bien. Merci beaucoup pour l'aide.
Bonne journée !

 

[Caribou]

Bonjour le fil,

Sans formules, sans macros mais avec Données/Convertir ça devrait le faire aussi
(en formatant Date en MJA à l'étape 3)

Ci-dessous la traduction VBA de ce Données/Convertir

Sub Macro1()
Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
        Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _
        :=Array(1, 3), TrailingMinusNumbers:=True
End Sub

PS: J'ai testé en copiant en Texte unicode les trois dates du message#1
=> test concluant.

Allo Staple1600,
J'avais essayé avec Données/Convertir mais je n'avais pas fait attention au format de la date (honte), fait que ça ne marchait pas. Oui ça fonctionne bien comme ça. Merci pour l'aide. C'est très apprécié.
Bonne journée !

 

[Staple1600]

Bonjour Caribou

Merci d'avoir pris le temps de répondre à chacun des intervenants du fil. 😉
(C'est relativement rare donc je le relève 😉)

Au final, ton choix s'est porté sur quelle solution?

 

[Caribou]

Bonjour Caribou

Merci d'avoir pris le temps de répondre à chacun des intervenants du fil. 😉
(C'est relativement rare donc je le relève 😉)

Au final, ton choix s'est porté sur quelle solution?

Fait plaisir.
J'ai opté pour Données/Convertir mais je trouve ça cool d'avoir les formules pareil car ça me permet aussi de progresser, et progresser, c'est bien 🙂