Titre du sujet : Re: Création calendrier userform par macro par Marco57 le 02/07/2008 16:39:23
Bonjour MDF, Lannou et le Forum,
Il suffit de placer ce code dans le module de code du formulaire :
Option Explicit
Private Sub Calendar1_DblClick()
ActiveCell = Calendar1.Value 'renvoie la date s?ctionn?dans la cellule active
Unload Me 'fait dispara?e le formulaire
End Sub
Private Sub UserForm_Initialize()
Calendar1.Value = Date 's?ctionne la date du jour ?'initialisation du calendrier
End Sub
Après quoi, un double clic sur la date choisie et elle s'insèrera dans la cellule active
A+
Marco
|