calendrier dans UF

[paul87]

Bonjour à tous , au Forum
dans un UF(1) (Brouillon de Travail), j'ai 2 TextBox et 2boutons de commande..
lorsque j'actionne un bouton de commande j'ai un UF(2) qui apparaît avec un formulaire calendrier...(avec une touche Valider et une touche Quitter).
Quel code appliquer pour avoir un remplissage de mes TextBox dans UF(1)si validation dans UF(2)..
Ci-joint une ébauche...
Merci par avance

 

[lacorse33]

Re : calendrier dans UF

Bonjour Paul87 et le forum,

Tu trouveras dans le fichier une solution à ta demande.

 

[Jacques87]

Re : calendrier dans UF

Bonjour Paul,

Voici une réponse à ta question

Il me semble que l'on ne peut pas contourner le fait de créer 2 calendriers (un pour la date début, un pour la date fin)

Bon courage

 

[Jacques87]

Re : calendrier dans UF

Oups Lacorse, je ne t'avais pas vu
De plus, je retiens ton astuce à laquelle je n'avais pas pensé

Bonne journée

 

[paul87]

Re : calendrier dans UF

Bonjour à tous, au Forum..
et Merci..à lacorse33 et Jacques87(tiens tiens quelqu'un du 87!!!)
J'ai bien transposé les codes...

Pour le UF

Private Sub CommandButton2_Click()
UserForm2.Show
TextBox4.Value = dtDateSelectionnee
End Sub

et pour le Calendrier

Private Sub CommandButton1_Click()
    dtDateSelectionnee = Calendar1.Value
    Unload UserForm2
End Sub

je devrais donc avoir a priori le meme fonvtionnement...!!!
j'ai un message d'erreur "erreur de compli..variable non définie"...Pourquoi?

 

[lacorse33]

Re : calendrier dans UF

Bonjour Paul87 et le forum,

Comme je te l'avais indiqué dans le fichier, il faut que tu déclares une variables globales dans Module1 :

Global dtDateSelectionnee As Date​

Peux-tu regarder dans le fichier que je t'ai envoyé ?
Si tu n'y arrives pas, envoie-nous un bout de ton fichier et on regardera ?

Merci

 

[paul87]

Re : calendrier dans UF

ben oui...😱
forcemment ça marche beaucoup mieux...
merci..🙂