XL 2010 RESOLU par Pierre-Jean - UserForm Intégrer affichage calendrier en saisie dans une TextBox

Usine à gaz · 23 Août 2016

Bonjour à toutes et à tous,

Me voilà en train de créer mon premier UserForm ..... c'est pas triste LOL mais j'avance.

Je bute sur l'intégration d'un calendrier lié à une textbox.

Voici mon besoin :
UserForm provoquer affichage calendrier en saisie dans une TextBox
Sélection et ENREGISTREMENT DANS LA CELLULE DE LA FEUILLE

J'ai importé une version UF du calendrier de Roland (encore merci au passage) dans le fichier test que je joins pour tests.

Je dois mettre dans le code de la textbox ou ailleurs la formule magique : fm_CalendrierCellMinMax.Show
Mais voilà …. Malgré toutes mes recherches et tentatives, je n'y arrive pas.

J'ai également exprimé mon besoin dans l'UserForm du classeur test joint.

Votre aide comme à l'habitude me sera précieuse pour comprendre ce qu'il faut faire.
Avec mes grands Mercis,
Je vous souhaite une bonne journée,
Amicalement,
Lionel,

pierrejean · 23 Août 2016

Bonjour arthour973

Vois s'il y a des progrès

Usine à gaz · 23 Août 2016

Bonjour Pierre Jean,

Merci pour cette réponse si rapide.
Effectivement, quand je clique sur le Label83, le calendrier s'ouvre.

Mais il faudrait qu'il s'ouvre en cliquant dans la Texbox7 (info 7) ce qui permet d'enregistrer dans ma feuille "ICI",

Je continue à chercher en partant de votre "avancée".
Amicalement,
Lionel,

pierrejean · 23 Août 2016

Re

Comme ceci peut être

Usine à gaz · 23 Août 2016

Bon sang ..... C'est exactement ça, je vais voir en détail pour comprendre.
Vraiment merci. C'est génial pour mon boulot.

Partant de zéro, j'ai, grâce au forum et aussi sur le net, étudié la création des UserForm mais j'ai un gros handicap : je ne parle pas anglais.

Mais je suis pas mal avancé même si quelques trucs restent en suspend.
Je reviendrai certainement.
Merci Pierre Jean,
Amicalement,
Lionel,

Usine à gaz · 23 Août 2016

LOL Je ne m'en lasse pas ..... encore Merci Pierre-Jean
Lionel,

Usine à gaz · 24 Août 2016

Bonjour Pierre-Jean,
Bonjour à toutes et à tous,

Je reviens pour une question car il y a un "truc" que je ne comprends pas.

Dans mon classeur de travail, j'ai l'UserForm complet et il y a plusieurs dates où doit s'afficher le calendrier au clic.
J'ai copié ton code en modifiant le numéro de la textbox et ça fonctionne très bien.

Voici ce que je ne comprends pas :
J'ai vu que dans le code du calendrier tu as mis le code suivant :
Private Sub ButtonOk_Click()
ActiveCell = CalendrierDateSELECT: Unload Me
UserForm1.TextBox7 = CalendrierDateSELECT: Unload Me
End Sub

Dans mon classeur, j'ai fait de même en y ajoutant les codes pour mes autres textbox.

Je viens de m'apercevoir qu'en rendant inactif les codes avec le ', ça marche quand même LOL
Voudrais-tu me dire quel est l'action de ce code ?
Private Sub ButtonOk_Click()
ActiveCell = CalendrierDateSELECT: Unload Me
'UserForm1.TextBox7 = CalendrierDateSELECT: Unload Me
'UserForm1.TextBox7 = CalendrierDateSELECT: Unload Me
'UserForm1.TextBox14 = CalendrierDateSELECT: Unload Me
'UserForm1.TextBox54 = CalendrierDateSELECT: Unload Me
End Sub

Avec mes remerciements,
Amicalement,
Lionel,

XL 2010 RESOLU par Pierre-Jean - UserForm Intégrer affichage calendrier en saisie dans une TextBox

Usine à gaz

XLDnaute Barbatruc

Pièces jointes

pierrejean

XLDnaute Barbatruc

Pièces jointes

Usine à gaz

XLDnaute Barbatruc

pierrejean

XLDnaute Barbatruc

Pièces jointes

Usine à gaz

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Discussions similaires