Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Développement d'un Userform Calendrier sous Excel

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Fred92
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
F

Fred92

XLDnaute Nouveau
Bonsoir à tous,

J'essaie de développer un Calendrier en VBA qui puisse être appelé en cliquant sur un contrôle Label placé dans un USERFORM. Le but est qu'après avoir sélectionné une date dans ce Calendrier, celle-ci s'affiche directement dans le contrôle Label du USERFORM.

Je précise que je ne souhaite pas utiliser l'objet DATE AND TIME PICKER CONTROL 6.0 comme calendrier.

Or je bloque actuellement sur le transfert de la date sélectionnée du calendrier vers le USERFORM (sachant que je souhaiterais que ce calendrier puisse être utilisé avec n'importe quel USERFORM, le contrôle de destination devant donc être un paramètre).

Je vous joins en pièce jointe copie de mon fichier et vous remercie par avance de l'aide que vous pourrez m'apporter (pour faire apparaître le calendrier cliquer sur le label où figure la date du jour).

Je reste à votre disposition pour tout renseignement complémentaire.

Fred92
 

Pièces jointes

Trier par date Trier par votes
Re : Développement d'un Userform Calendrier sous Excel

Bonjour ,

Pour transférer ta date d'un userform à l'autre utilises une variable public défini dans un module standard.

Exemple : Public Date_Choisie as string

ensuite dans le userform date_choisie = textbox xxx
ou
dateactuelle = date_choisie

Il faut également revérifier le fonctionnement de ton calendrier qui visiblement pêche un peu .
 
Vote positif 0 Vote négatif
Re : Développement d'un Userform Calendrier sous Excel

Bonsoir Camarchepas,

Tout d'abord merci pour avoir consulté ma demande et y avoir répondu.

Dans le fichier joint, il y a bien deux variables publiques qui sont stockées dans le module standard A_FRM_Calendrier_Module. Ces variables sont:

Public DateCalendrier As Date (qui sert au stockage de la date)
Public ControleName As control (qui doit servir en théorie à stocker le nom du contrôle (le Label) dans lequel doit être retourné la date).

Le Calendrier en lui même fonctionne maintenant. Le message d'erreur provenait d'une erreur de ma part ayant oublié de définir la variable objet (ControleName) avec l'instruction Set (je renvoie le fichier modifié).

Cependant, en sélectionnant une date, je n'arrive toujours pas à retourner cette valeur dans le Label du USERFORM1.

L'objet ControleName n'a pas de propriété "Caption" et je pense que le problème vient de là.

Qu'en pensez vous? Comment obtenir cette propriété Caption?

Fred92
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Développement d'un Userform Calendrier sous Excel

Rebonsoir Camarchepas,

J'ai essayé le fichier que tu m'as envoyé et il y a un message d'erreur "Incompatibilité de Type" lorsqu'on appel le calendrier en cliquant sur le bouton CommandButton1:

la ligne de code qui pose problème:

TextBox1.Text = Calendriers.Calendrier(CDate(TextBox1.Text))

As tu le même message d'erreur?

Merci pour ton aide.

Fred92
 
Vote positif 0 Vote négatif
Re : Développement d'un Userform Calendrier sous Excel

Bonjour Si...,

Tout d'abord merci pour ton aide. La solution que tu proposes ne répond pas à la problématique. En effet dans le module du Calendrier la ligne que tu as écrite pour renseigner FRM_USERFORM1 est:

FRM_USERFORM1.FRM_Date_Saisie = CDate(CaseJR & "/" & CbMois.ListIndex + 1 & "/" & CbAnnee)

Sauf que FRM_USERFORM1 doit être une variable pour que ce Calendrier puisse être utilisé avec n'importe quel USERFORM. Dans ton cas, la date sélectionnée sera retournée à seulement FRM_USERFORM1.

J'espère avoir été suffisamment clair dans mes explications.

Dans l'attente de vous lire car pour le moment je bloque complètement.

Fred92
 
Vote positif 0 Vote négatif
Re : Développement d'un Userform Calendrier sous Excel

salut

à voir avec 2 variables "Public" bien typées.
je n'ai pas fait de contrôle de ton calendrier car je l'aurais programmé de façon très différente (voir dans les propositions que j'ai faites dans d'autres fils).
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Développement d'un Userform Calendrier sous Excel

Re à tous ,

Oui normal ,
Car il faut renseigner la date d'origine pour le calendrier , je pensais que c'est ce que tu voulais ,

JE viens de modifier pour que par défaut ce soit la date du jour ,

Il faut malgrés tous si tu change la date , mettre une date correcte
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Développement d'un Userform Calendrier sous Excel

Re bonjour à tous les deux,

Je tiens à vous remercier l'un et l'autre pour les solutions apportées (qui sont en définitive très proche l'une de l'autre).

J'ai cherché à compliquer le problème alors que la solution est finalement simple (fallait il pour autant la trouver!).

Encore un grand merci ainsi qu'au forum qui est une source de connaissance exceptionnelle.

Bonne fin de journée à tous.

Fred92
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
Autres Affichage d'un Userform
Réponses
6
Affichages
172
Poltoine
  • Résolu(e)
Microsoft 365 Adaptation d'un Userform calendrier
2 3
Réponses
35
Affichages
3 K
Gen Rose
Userform, DatePicker, TimePicker, et autres
Réponses
0
Affichages
2 K
mromain
P
  • Question Question
Microsoft 365 garder en mémoire plusieurs listview d'un userform
Réponses
4
Affichages
621
patricktoulon
  • Question Question
Microsoft 365 Création d'un fichier entier par rapport à des entrées via UserForm
Réponses
1
Affichages
677
job75
  • Résolu(e)
Microsoft 365 UserForm calendrier ne pas pouvoir en sortir si pas de date sélectionnée
Réponses
6
Affichages
606
Usine à gaz
  • Question Question
XL pour MAC Calendrier et remplissage automatique
2
Réponses
28
Affichages
2 K
TooFatBoy
A
  • Question Question
Microsoft 365 Afficher / Masquer des frames à partir d'un tableau d'applicabilité
2
Réponses
16
Affichages
1 K
Ay-Ricko
A
A
  • Question Question
Microsoft 365 Afficher la valeur d'une cellule en fonction de 3 conditions via VBA
Réponses
2
Affichages
653
Ay-Ricko
A
Y
  • Résolu(e)
XL 2019 Userform à adapter par rapport les colonnes d'un tableau
2
Réponses
21
Affichages
2 K
YAP32
Y
W
  • Question Question
XL 2019 VBA - ouverture d'un fichier Excel pour consultation depuis un userform
Réponses
2
Affichages
2 K
Wana
W
S
  • Question Question
XL 2010 calendrier automatique avec choix
2 3 4
Réponses
49
Affichages
5 K
patricktoulon
  • Résolu(e)
Microsoft 365 Calendrier : Ne pas pourvoir sélectionner une heure inférieure à maintenant
Réponses
6
Affichages
1 K
Usine à gaz
K
  • Question Question
Autres Création d'un calendrier de procédure
Réponses
6
Affichages
3 K
Deadpool_CC
E
  • Question Question
XL 2016 Créer une tache dans Outlook en fonction d'un tableau Excel
Réponses
0
Affichages
2 K
estivill
E
R
  • Question Question
XL 2019 Affichage dynamique dans un Label d'un UserForm
Réponses
2
Affichages
2 K
re4
R
N
  • Question Question
Autres Incorporer date dans mail via userform calendrier
Réponses
0
Affichages
763
nouun
N
  • Question Question
XL 2010 Formulaire Excel à faire évoluer avec Macro VBA et UserForm
Réponses
5
Affichages
1 K
Virginie17d
  • Question Question
XL 2016 Problème formulaire
2 3
Réponses
34
Affichages
3 K
Calypso50
I
  • Question Question
XL 2010 Transfert d'une variable d'un userform à une macro
Réponses
2
Affichages
1 K
Dudu2
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…