Données D'un UserForm vers un UserForm

Bonjour,

j'aimerai connaître le code pour récupérer une date du calendar vers un textbox d'un autre userform.

Merci

Bonjour acymospc,

Avec le code suivant, si j'ai bien compris, cela fonctionne

Private Sub MonthView1_DateClick(ByVal DateClicked As Date)

End Sub

J'ai renommé ton Userform : Userform1 car il y avait un conflit (je n'ai pas regardé pourquoi) et en double-cliquant une date sur l'userform "UsrFrmCalendar" la date s'inscrit dans le TextBox "TxtBxDate"

A toi de jouer !

Et1000lio

https://cellulexcel.blogspot.fr/p/blog-page_14.html

Bonjour et1000lio

Tout d'abord merci pour ton blog.

J'ai changé le nom du Userform dans les codes, mais pour moi la date ne se met pas dans la textbox.

Merci pour ta patience

acymospc,

J'ai supprimé les déclarations suivantes :

et cela fonctionne :

Et1000lio

Bonjour et1000lio

Tu es le meilleur.

Merci

Bonjour,

J'ai essayé d'utiliser votre code pour récupérer de la même manière la date dans ma textbox et rien ne se passe.

J'ai aussi utiliser le code pour remplir ma combobox avec la liste déroulante "état" et la liste en s'affiche pas.

Je vous mets mon fichier si vous trouvez mon/mes erreurs.

Merci d'avance,

Bonjour cgervasi-knz,

Pour info le sujet est clôturé, tu aurais du ouvrir un autre post en mettant celui-ci en référence.

Mais bon ce n'est pas grave, voici la réponse à ta question.

Dans le Formulaire F_calendrier le bouton Valider (CommandButton1) n'as pas de programmation si ce n'est que de fermer l'userform

Donc voici le code :

Private Sub CommandButton1_Click()
'CODE BOUTON VALIDER
Inter_astreinte.TextBox1 = Me.TextBox1 'La textbox1 de l'Userform "Inter_astreinte" est égale à la donnée
'de la TextBox1 du présent Userform
    Unload Me 'Ferme le présent Userform
Inter_astreinte.Show 'Ouvre l'userform "Inter_astreinte"
End Sub

Dans l'userform Inter_astreinte modifie le code du CommandButton3 par celui-ci

Private Sub CommandButton3_Click()
Me.Hide
    F_calendrier.Show
End Sub

Ci-joint ton fichier corrigé