Icône de la ressource

VBA - Calendrier sur la base d'un UserForm V1

Le fichier à télécharger contient:
  1. Le UserForm Calendrier à importer dans le projet VBA.
  2. Le Module_Test qui donne quelques exemples d'utilisation.
L'appel de la fonction:
VB:
Dim DateChoisie as Date
'
DateChoisie = UserForm_Calendrier.Display(...voir la description des paramètres dans le code...)

Les principales caractéristiques du calendrier:
  • Permet une utilisation simple ou plus "avancée" pour la gestion des contrôles de la date choisie.
  • Indique les jours fériés sur option.
  • Est prépositionnable (Left & Top du UserForm).
  • Une Fonction Utilisateur peut-être appelée au moment du choix de la date pour des contrôles par exemple.
  • Une fonction additionnelle UserForm_Calendrier.Modify() à appeler dans la Fonction Utilisateur permet de modifier certains paramètres du calendrier, de le déplacer, de le garder ouvert, de le fermer, etc...
Note: ceci est une 2ème publication car @fanch55 a découvert dans la 1ère version que la taille de police des Controls du UserForm définie à 10 sous Excel 2016, passait à 11 sous Excel 2019 sans aucune justification. Le code modifié force maintenant la police à 10 à l'ouverture du UserForm.

DémoCalendrier.gif
  • J'aime
Réactions: thomas1