Modifier le textbox d'un userform à partir de n'importe quelle feuille du classeur

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 !

olivier_bahrein

XLDnaute Junior
Bonjour,

comment fait-on pour modifier le textBox d'un userform à partir du code d'une feuille excel (VBA) ?

Par exemple:

J'ai une feuille excel avec un bouton
Ce bouton lance le userform

si dans la feuille je mets en code

Private Sub BtAnnée1_Click()
TextBox.Value = Format(Date, "yyyy")
UserForm.Show
End Sub

J'ai un message d'erreur 424 "objet requis"

la référence au Textbox n'est pas bonne je pense car la feuille excel ne connait pas cet objet.

Comment dois-je corriger ?

Merci,

Olivier./.
 
Re : Modifier le textbox d'un userform à partir de n'importe quelle feuille du classe

olivier_bahrein à dit:
Bonjour,

comment fait-on pour modifier le textBox d'un userform à partir du code d'une feuille excel (VBA) ?

Par exemple:

J'ai une feuille excel avec un bouton
Ce bouton lance le userform

si dans la feuille je mets en code

Private Sub BtAnnée1_Click()
TextBox.Value = Format(Date, "yyyy")
UserForm.Show
End Sub

J'ai un message d'erreur 424 "objet requis"

la référence au Textbox n'est pas bonne je pense car la feuille excel ne connait pas cet objet.

Comment dois-je corriger ?

Merci,

Olivier./.


Je viens de trouver une solution:

Private Sub BtAnnée1_Click()
Load UserForm
UserForm.TextBox1.Value = Format(Date, "yyyy")
TextBox.Value = Format(Date, "yyyy")
UserForm.Show
End Sub

N'y-at-il pas plus simple ?
 
Re : Modifier le textbox d'un userform à partir de n'importe quelle feuille du classeur

Bonjour Olivier, bonjour le forum,

Essaie comme ça :

Code:
Private Sub BtAnnée1_Click()
UserForm1.TextBox1.Value = Format(Date, "yyyy")
UserForm1.Show
Ens Sub
 
- 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
Microsoft 365 aide userform
Réponses
11
Affichages
834
Retour