XL 2016 VBA userFrom Calendar

Dudu2

XLDnaute Barbatruc

• 23 Mai 2022

• #2

Bonjour,
Ça va être dur de trouver un calendrier qui permet de saisir 2 dates d'un coup.
Pourquoi ne pas afficher 2 fois le calendrier pour saisir les 2 dates ?

 

Vote positif 0 Vote négatif

Dudu2

XLDnaute Barbatruc

• 23 Mai 2022

• #3

Ou alors utiliser le calendrier que j'ai développé (UserForm_Calendrier + Module_Calendrier) qui permet de faire ça facilement.

 

Pièces jointes

• Classeur1.xlsm

  50.9 KB · Affichages: 26

Vote positif 0 Vote négatif

Dudu2

XLDnaute Barbatruc

• 24 Mai 2022

• #4

Dans cette version, j'ai formalisé le changement des paramètres du calendrier (pour ce cas le texte du message "Début période" -> "Fin de période") dans une fonction pour ne pas avoir à utiliser directement les variables d'échange UserForm <-> Module du calendrier.
Ça ne change rien fonctionnellement mais c'est plus "clean".

 

Pièces jointes

• Calendrier Personnalisé - Exemple choix d'une période.xlsm

  53.7 KB · Affichages: 15

Vote positif 0 Vote négatif

C

c_brt

XLDnaute Nouveau

• 24 Mai 2022

• #5

Bonjour,

Je vous remercie pour votre réponse je vais y jeter un coup d'œil. Puisque j'ai opter pour la solution de faciliter et de faire une colonne date de début et une colonne date de fin. En utilisant 2 calendrier

Bonne fin de journée

 

Vote positif 0 Vote négatif

V

VIARD

XLDnaute Impliqué

• 24 Mai 2022

• #6

Bonjour @Dudu2 , @c_brt et à tous

Le sujet m'a interpellé, aussi j'ai modifié mon programme en conséquence.
La plage démarre au jour afficher, si c'est le 24, on aura une plage courant jusqu'enfin de mois.
il suffit de changer le jour, le mois ou l'année pour avoir la plage correspondante.
Salutation

Jean-Paul

 

Pièces jointes

• Calendrier_Mini_2S.xlsm

  29.5 KB · Affichages: 14

Vote positif 0 Vote négatif

V

VIARD

XLDnaute Impliqué

• 25 Mai 2022

• #7

Bonjour @Dudu2 , @c_brt et à toutes et tous

J'ai complété le petit programme pour avoir une plage de fin.
si l'on est le 10, en ajoutant 5 on aura bien une plage de 10 à 15.
le travail se fait uniquement sur le mois courant, pour le mois suivant il suffit de rajouter les jours manquant.

Salutation
Jean-Paul

 

Pièces jointes

• Calendrier_Mini_3S.xlsm

  31.7 KB · Affichages: 11

Vote positif 0 Vote négatif

D

Dada7979

XLDnaute Nouveau

• 14 Décembre 2023

• #8

Bonsoir! merci d'avance pour le travail effectué!!
après avoir un petit peu modifié votre code; il fonctionne très bien dans une feuille; mais à l'intérieur d'un userform; il me met une erreur sur " Calendrier_TargetObject.Value" savez vous si il faut changer quelque chose pour les USF svp ?!!

 

Vote positif 0 Vote négatif

Dudu2

XLDnaute Barbatruc

• 14 Décembre 2023

• #9

Bonjour,
Dans un UserForm ça fonctionne aussi, du moins la ressource ci-dessous que je vous recommande fortement d'utiliser, sinon je n'ai pas utilisé les fichiers trop anciens de ce sujet.

Je suppose que vous avez utilisé un TargetObject qui n'a pas de propriété .Value, un Label ?

Essayez cette ressource qui accepte différents types d'Objects en tant que TargetObject.

VBA - Calendrier sur la base d'un UserForm

Le fichier à télécharger contient: Le UserForm Calendrier à importer dans le projet VBA. Le Module_Test qui donne quelques exemples d'utilisation Note: Voir toutes mes ressources -> https://excel-downloads.com/resources/?creator_id=268468 Les...

excel-downloads.com

 

Dernière édition: 14 Décembre 2023

Vote positif 0 Vote négatif