Conversion à l'aide de CDate ?

Bonjour,
j'aimerais faire saisir à l'utilisateur la date à laquelle il veut le compte rendu
c'est à dire par exemple 052007 et que cellci me soit retournée dans une cellule sous la forme 05/2007 ou mai 2007.
Voici le code mais qui me retourne une valeur

Code:

---

1 2 3 4

Dim datefin As Date datefin = InputBox(prompt:="Saisir la date situation:", _ Title:="Saisie de date") Range("feuil1!D5") = "=(" & CDate(datefin) & ")"

---

bonjour ludooo

Citation:

---

Dim datefin As Date
datefin = InputBox(prompt:="Saisir la date situation:", _
Title:="Saisie de date")
Range("feuil1!D5") = "=(" & CDate(datefin) & ")"

---

ton code devient :

Citation:

---

Range("feuil1!D5") = cdate(InputBox(prompt:="Saisir la date situation:", Title:="Saisie de date"))
Range("Feuil1!D5).Numberformat = "mm/aaaa"

---

Citation:

---

Envoyé par wilfried_42

bonjour ludooo





ton code devient :

---

mais comment doisje saisir la date pour que ça marche car je ne suis peut etre pas doué mais ça me renvoi pas les bonnes choses????

Bonjour,
J'ai toujours un problème puisque si je tape 01122006 cela me renvi dans la cellule 12/vendredi
il doit y avoir un hick quelque part!!! Que dois je taper dans ma fenetre pour que cela me sorte la bonne chose c'est à dire Decembre 2006

Code:

---

1 2	Range("feuil1!D5") = CDate(InputBox(prompt:="Saisir la date situation:", Title:="Saisie de date")) Range("Feuil1!D5").NumberFormat = "mm/aaaa"

---

re:

oui il y a un hic, a chaque fois, je m'y prends en deux fois............

sur excel c'est en francais, en vba en anglais

le format : "mm/yyyy" ----------> y pour year et a pour annee

bon apres midi