renvoyer la donnée d'une InputBox Fermé

Question

Bonjour,

Je débute en VB (2007) et j'ai besoin d'une aide.
Pour faire simple, j'ai une InputBox qui demande à l'utilisateur d'entrer une date.

Et j'ai 2 problèmes quant à cette date :

1) faire en sorte que seules les dates au format JJ/MM/AAAA soient valides (pour l'instant j'ai juste mis un IsNuméric, mais ça ne colle pas vraiment)
2) que cette date soit collée dans une UserForm et qu'elle génère une 2è date J+15. Exemple : j'entre la date du 30 mars 2008, une UserForm m'indique que la date entrée est le "30 mars 2008" et que la seconde est le 15 avril 2008.

Merci d'avance pour votre aide :)

progfann · Answer

La fonction isNumeric ne marchera jamais avec une date parce que deja cette derniere se considere comme une chaine de caractere, et si tu veux que ta date prendra cette forme, il suffit de la declarer comme "date"

2. textbox1.text=tadate
textbox2.text= DateAdd("d", 15, TextBox1.Text)

bonne chance

Renvoyer la donnée d'une InputBox

1 réponse

Discussions similaires