OVH Cloud OVH Cloud

Question d'un béotion : saisie d'une date via VB

3 réponses
Avatar
Laurent Stern
Bonjour

Dans une macro VB je souhaite saisir une date (format chaîne "JJ/MM/AAAA").

En fait pour être plus précis je n'ai besoin que du mois/année (avec année
en optionniel).

Y a t il un moyen simple de faire cette demande interactive ?

Merci

--
----------------------------------------------------------------
Laurent Stern
Cap Gemini Ernst & Young - Telecom Media & Networks
BCA (Billing & Customer Administration)
Tel: +33 1 49 00 42 15

3 réponses

Avatar
Xav
salut,

ex :

dim Tmp as string

tmp=inputbox("Saisir une date")

a toi de faire les controles derriere

@++

xav


"Laurent Stern" a écrit dans le message de
news:
Bonjour

Dans une macro VB je souhaite saisir une date (format chaîne


"JJ/MM/AAAA").

En fait pour être plus précis je n'ai besoin que du mois/année (avec année
en optionniel).

Y a t il un moyen simple de faire cette demande interactive ?

Merci

--
----------------------------------------------------------------
Laurent Stern
Cap Gemini Ernst & Young - Telecom Media & Networks
BCA (Billing & Customer Administration)
Tel: +33 1 49 00 42 15




Avatar
Jérôme Prioux
Ce contrôle ne fonctionne pas très bien. Lorsque je l'ai utilisé, j'ai fini
par le remplacer par une textbox ordinaire.
J'écris le contrôle des caractères dans le code (type de caractères,
longueur).
Dans l'événement LostFocus, je met au bon format : Text1 = Format (Text1,
"mm/yyyy")

"Ledev" a écrit dans le message de news:

Laurent Stern wrote:
> Bonjour
>
> Dans une macro VB je souhaite saisir une date (format chaîne
> "JJ/MM/AAAA").
>
> En fait pour être plus précis je n'ai besoin que du mois/année (avec
> année en optionniel).
>
> Y a t il un moyen simple de faire cette demande interactive ?
>
> Merci

Un Formulaire avec dessus un contrôle MaskedEdit("Microsoft Masked Edit"
dans la liste des composants). Mais je ne sais pas si elle s'install avec
VBA????

Puis, dans sa propriété Mask, tu met:
99/9999

Et là l'utilisateur ne pourra entrer que le mois et l'année.

a+




Avatar
Ledev
Jérôme Prioux wrote:
Ce contrôle ne fonctionne pas très bien. Lorsque je l'ai utilisé,
j'ai fini par le remplacer par une textbox ordinaire.
J'écris le contrôle des caractères dans le code (type de caractères,
longueur).
Dans l'événement LostFocus, je met au bon format : Text1 = Format
(Text1, "mm/yyyy")



Oui effectivement, il merde pas mal, donc si je peut te donnez un conseil,
ne suis pas le mien, mais celui de Jérôme ;-).
Mais si tu veus faire une bidouille vite fait, tu peut l'utilisée(mais pour
une macro distribuer, oublie).

a+