Convertir textes avec longueurs différentes au format date

Caribou

XLDnaute Nouveau
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
 

mapomme

XLDnaute Barbatruc
Supporter XLD
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.
 

Pièces jointes

  • Caribou-date mois jour en jour mois- v1.xlsx
    13.1 KB · Affichages: 10

Staple1600

XLDnaute Barbatruc
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
VB:
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.
 

Staple1600

XLDnaute Barbatruc
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

XLDnaute Barbatruc
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) ;)
 
Dernière édition:

Caribou

XLDnaute Nouveau
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

XLDnaute Nouveau
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
VB:
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 !
 

Discussions similaires

Statistiques des forums

Discussions
315 103
Messages
2 116 228
Membres
112 690
dernier inscrit
noureddinee