calendrier

[duplaly]

Bonjour
j'ai 6 userform avec des textbox que je voudrais insérer la date à partir d'un calendrier unique, mais je n'arrive pas à écrire le code vba.
quelqu'un peut-il me donner un coup de pouce.
Merci

 

[Bebere]

Re : calendrier

bonjour Duplaly
prépare nous un fichier avec ce que tu souhaites
à bientôt

 

[duplaly]

Re : calendrier

Bonjour Cher forum,

Voilà, j'ai un calendrier qui alimente un textbox dans un userform. pour saisir des dates.
Mais je voudrais utiliser le même calendrier à partir d'autres userforms pour ne pas créer un calendrier pour chaque textbox.. en fait dans chacun des 6 userforms, je dois saisir date début et date fin, soit 2 textbox à alimenter par userform.
voir mon code actuel pour alimenter un textbox.

Private Sub Calendar1_Click()
Heures.TextBox1.Value = Format(Calendar1.Value, "dd-mmm-yyyy")

Unload Me

End Sub

Private Sub UserForm_Activate()
Calendar1 = Date
End Sub

Private Sub TextBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal y As Single)
Calendar1.Show

End Sub

 

[Bebere]

Re : calendrier

bonjour Duplaly
voilà un exemple

 

[duplaly]

Re : calendrier

Allo Bebere
Merci beaucoup pour le fichier. Je l'ai adapté à mon projet et tout fonctionne très bien.
good job.