Calendar/Monthview autonome (Mixte : Userform/Sheet)

Pour partager vos applications (Excel, Calc et Google Sheets) avec les autres membres
f
fmas
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 14 octobre 2019
Version d'Excel : 2013 FR

Message par fmas » 14 octobre 2019, 19:24

Bonsoir à Tous et merci Galopin01 pour ton fichier pour incorporer un calendrier dans un UserForm (merci aux autres également).

je sais que cette discutions date mais elle sert toujours...

j'ai suivi (il me semble) ta procédure pour incorporer "Calendrier", "MainCal" et "Classe1" mais je n'arrive pas à faire actionner le calendrier dans le formulaire. le calendrier devrait s'afficher dans la cellule "MEG" du formulaire (colonne H du tableau) et qui se nomme "TextBox4" dans l'UserForm1.
j'ai modifié d'abord dans mon tableau "textBox4" par "thDate" mais j'avais des bugs et j'ai donc tout remis avec "textBox4" et j'ai modifié ton code en mettant ce nom à chaque ligne où il y avait "thDate".

Te (vous) serait il possible de regarder l'erreur que j'ai fait pour que le calendrier ne s'affiche pas.

dans l'attente et en vous remerciant par avance
Bonne soirée

en PJ le fichier:
Gestion_Chantier_TEST_Formulaire.xlsm
(85.99 Kio) Téléchargé 31 fois
f
fmas
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 14 octobre 2019
Version d'Excel : 2013 FR

Message par fmas » 23 octobre 2019, 09:38

Bonjour à Tous,

vous serait il possible de me venir en aide sur ma demande du 14 octobre ci dessous?
malgré mes essais, je n'arrive pas à trouver l'erreur pour afficher le calendrier dans la TextBox;
en vous remerciant de l'aide que vous pourrez m'apporter.
Bonne journée
Francis :cry:
h
hlbr
Jeune membre
Jeune membre
Messages : 19
Inscrit le : 20 août 2018
Version d'Excel : 2016 FR

Message par hlbr » 23 octobre 2019, 16:28

Bonjour, excusez moi de "déterrer le post", je trouve le programme très intéressant, mais je ne comprend pas comment faire pour "l'installer" dans mon propre projet. Qu'entendez vous par "glisser le Useform dans votre projet" ?
Cordialement
hlbr
Avatar du membre
galopin01
Passionné d'Excel
Passionné d'Excel
Messages : 6'394
Appréciations reçues : 163
Inscrit le : 18 septembre 2008
Version d'Excel : 2016
Téléchargements : Mes applications

Message par galopin01 » 24 octobre 2019, 14:39

Bonjour,
[fmas] : Comme dit dans le fichier de téléchargement votre TextBox4 doit être nommé "tbDate"
puis vous devez insérer cette macro dans le code du UserForm :
Private Sub tbDate_Enter()
TB = 1
Calendrier.Show
End Sub
Si vous désirez conserver l'appellation TextBox4
Dans cas c'est cette macro que vous devrez ajouter :
Private Sub TextBox4_Enter()
TB = 1
Calendrier.Show
End Sub
Dans les 2 cas vous devez visiter le Module de Classe car vous avez également renommé votre UserForm en UserForm1
Dans ce module de classe vous devez adapter cette ligne à votre choix :
Else 'si utilisation dans un  UserForm ******************************************???
    UserForm1.tbDate.Value = maDate 'ou
    UserForm1.TextBox4.Value = maDate  'une de ces lignes doit être supprimée selon votre choix...
End If    
[hlbr] :
Dans Visual Basic, dans la fenêtre VBAProject les deux classeur étant ouverts, vous faites glisser le UserForm et les différents modules du projet source vers votre projet. Au besoin agrandissez la fenêtre VBAProject verticalement pour pouvoir voir les 2 projets en même temps...
Attention comme précisé ci dessus pour fmas, si vous utilisez le calendar dans un UserForm pensez à corriger la ligne (dans le module de classe ) :
usfDemo.tbDate.Value = maDate
...selon vos propres appellations !

A+
Question portant sur VBA : Je ne répond pas si la question ne comporte pas le classeur KIVABIEN avec.
f
fmas
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 14 octobre 2019
Version d'Excel : 2013 FR

Message par fmas » 24 octobre 2019, 15:24

Merci Galopin01, :clap: :clap: :clap:
cela fonctionne TRÈS bien, MERCI pour cette aide.
Puis je vous demander une autre intervention, si je souhaite intégrer dans ce calendrier les congés annuel ou de fermeture (qui changerons d'une année sur l'autres) avec une autre couleur de fond (rouge par exemple), comment faut il que je modifie dans votre code et où le placer ( ou éventuellement pouvoir le mettre sur une autre feuille pour ne pas a avoir à modifier le code).
Encore MERCI
Fmas
Avatar du membre
galopin01
Passionné d'Excel
Passionné d'Excel
Messages : 6'394
Appréciations reçues : 163
Inscrit le : 18 septembre 2008
Version d'Excel : 2016
Téléchargements : Mes applications

Message par galopin01 » 24 octobre 2019, 16:17

Cette demande est un peu suréaliste (déraisonnable)... J'ai bien peur que vous n'y trouviez peu d'écho.
A+
Question portant sur VBA : Je ne répond pas si la question ne comporte pas le classeur KIVABIEN avec.
f
fmas
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 14 octobre 2019
Version d'Excel : 2013 FR

Message par fmas » 24 octobre 2019, 16:40

::( ::( (°v°)° (°v°)° (°v°)°

MERCI beaucoup, je clôture donc le sujet
:bien: :thx:
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message