lier deux userforms

[denisl]

Bonjour,

je suis toujours sur mon fichier de suivi, j'ai créer une seconde userform qui est référenciée dans la première, c'est un calendrier) et j'aimerais que la valeur de calendar-click() soit directement imputée dans la case de l'userform1.

mon code utilisé est : (userform2)

Private Sub Calendar1_Click()
Unload Me
dateD.value = Format(Calendar1.value, "mm/dd/YY")
End Sub
Private Sub UserForm_initialize()
Calendar1.value = Date
End Sub

Classeur1.xls

XLS 2003

(108 Kio) Téléchargé 12 fois

Cordialement
Merci par avance

[denisl]

Private Sub Calendar1_Click()
Unload Me
Userform1.dateD.value = Format(Calendar1.value, "mm/dd/YY")
End Sub
Private Sub UserForm_initialize()
Calendar1.value = Date
End Sub

le truc un peu obvious...

solve!