Calendrier

[Loulidu83]

Bonjour,

je souhaiterai mettre un filtre sur une cellule pour lui mettre un calendrier, en cliquant sur la flèche de la cellule apparaitrait alors un calendrier qui se positionnerai par défaut sur le mois en cours, que je changerai au besoin, un peu comme lorsque l'on fait une résa d'un billet sur internet pour choisir la date de son voyage

[MattChess]

Bonjour,

1. Créer le calendrier sur la feuille

Il faut insérer l'objet Calendrier sur la feuille Excel.
Cliquez sur l'Excel menu "Insérer" > "Objet"

Si vous ne trouvez pas l'objet Calendrier, son nom anglais peut être Calendar Control 8.0 avec un n° de version selon votre Excel.
Le chemin complet pour y accéder peut être C:\Windows\system32\MSCAL.ocx

1.1 Test dans un UserForm

Une autre façon de voir si le calendrier est présent est de créer un UserForm de test :

Dans le Visual Basic Editor (Alt+F11), cliquez sur le menu "Insérer" > "UserForm"
Dans la boite à outil (Toolbox) ayant l'icône du marteau,
cliquez avec le bouton droit > Menu contextuel "Contrôle Additionnels" (Additional Controls)
Cochez l'option [x] Calendar Control 8.0

1.2 Masquer le calendrier

Une fois que vous aurez réussi à créer le calendrier Calendrier1 ou Calendar1 sur la feuille, vous allez le masquer avec sa propriété Visible = False.

2. Faire apparaître le calendrier sur double-click

Voir la solution de BrunoM45.
Il faudra adapter la solution à la rangée(s) et/ou la colonne(s) où il faut gérer le calendrier.
Notez comment on adjuste les propriétés Top, Left selon la cellule où on souhaite afficher le calendrier.

Envoyé par Loulidu83

en cliquant sur la flèche de la cellule apparaîtrait alors un calendrier qui se positionnerait par défaut sur le mois en cours

Dans le cas où le calendrier s'appelle Calendar1 :

Code :

1
2
Calendar1.Value = Date ' Adjuste la date du calendrier sur la date courante
Calendar1.Visible = True ' Quand toutes les propriétés sont OK, afficher le calendrier

Sur l'événement Click du Calendrier, on pourra récupérer la date sélectionnée dans le Calendrier.
___________

Si la discussion est résolue, vous pouvez cliquer sur le bouton

En bas de ce message s'il vous a apporté des éléments de réponse pertinents, pensez également à voter en cliquant sur le bouton vert ci-dessous.

[kiki29]

Salut, voir exemple sur http://www.developpez.net/forums/d43...ellule-active/