Discussion :

[Ludoooo]

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 :

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

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

[wilfried_42]

bonjour ludooo

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

ton code devient :

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

[Ludoooo]

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????

[Ludoooo]

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 :

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

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

[wilfried_42]

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