Discussion :

[isrdum]

Bonjour aux experts

J'ai un fichier excel avec une tonne de date de répondants. Je veux déterminer leur âge, mais la fonction =DATEDIF(A2;AUJOURDHUI();"y") demande que la date de naissance soit de ce format AAAA-MM-JJ alors que dans mon fichier elles sont dans ce format MM-JJ-AAAA.

Je voulais faire une macro pour changer les dates des répondants de MM-JJ-AAAA à AAAA-MM-JJ. Pour y arriver me faudrait du code qui permettrait de lire l'information d'une cellule jusqu'à de que j'arrive à un "-" et la mettre dans une case mémoire#1, ensuite, lire les infos jusqu'au deuxième "-" et mettre dans une case mémoire#2, pour ensuite lire le reste et mettre dans une case mémoire#3

ensuite je devrai reconstruire les infos en mettant un "-" entre chacune d'elles Mémoire#3"-"Mémoire#1"-"Mémoire#2

Voilà....

Évidemment, si vous avez une meilleure solution (ce qui sera probablement le cas) je vous en prie!

merci beaucoup

[anasecu]

Bonjour

mais la fonction =DATEDIF(A2;AUJOURDHUI();"y") demande que la date de naissance soit de ce format AAAA-MM-JJ alors que dans mon fichier elles sont dans ce format JJ-MM-AAAA

La fonction fonctionne avec la valeur qui doit être numérique de la cellule et ne s'occupe absolument pas du format.

Si elle ne fonctionne pas sur ton classeur c'est que tu as du texte et non un nombre de jours depuis 1900.

Avec le format 'mercredi 13 décembre 1995' saisi correctement (13/12/95) tu auras ton résultat =22

[isrdum]

Bonjour


La fonction fonctionne avec la valeur qui doit être numérique de la cellule et ne s'occupe absolument pas du format.

Si elle ne fonctionne pas sur ton classeur c'est que tu as du texte et non un nombre de jours depuis 1900.

Avec le format 'mercredi 13 décembre 1995' saisi correctement (13/12/95) tu auras ton résultat =22

Merci de votre réponse

Pourtant lorsque manuellement je replace les bons nombres aux bonnes places dans le format AAAA-MM-JJ, le calcul de l'âge s'effectue sans que j'aie modifié l'élément "nombre" de la cellule

[anasecu]

re

Pourtant lorsque manuellement je replace les bons nombres aux bonnes places dans le format AAAA-MM-JJ, le calcul de l'âge s'effectue sans que j'aie modifié l'élément "nombre" de la cellule

Comment tu replaces sans saisie de la valeur ? simplement en changeant de format ?

[isrdum]

re

Comment tu replaces sans saisie de la valeur ? simplement en changeant de format ?

Merci Anasecu

Effectivement j'ai fait un test. Lorsque je change le format de la cellule en "nombre" ou en "date", rien ne se passe..... Je crois que tu as vu juste, je suis en format texte! Maintenant, comment est-ce que je peux convertir le tout en format nombre

[Transitoire]

Bonjour,

Sub test()
Z = Range("a1").Value 'Valeur cellule texte
Range("b2") = CDate(Z) 'Devient une date
End Sub

Cordialement

[anasecu]

Bonjour,

comment est-ce que je peux convertir le tout en format nombre

Pour convertir toute ta colonne A

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Dim cel As Range
    For Each cel In ActiveSheet.UsedRange.Columns(1)
        cel.Value = CDate(DateValue(cel.Value))
    Next cel