Rapport de message :*
 

Re: Création calendrier userform par macro

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