Faire apparaître une textbox selon critère dans Userform

  • Initiateur de la discussion Initiateur de la discussion julien974
  • 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 !

julien974

XLDnaute Occasionnel
Bonjour,

J'ai une combobox1 dans ma userform. Celle ci a deux choix, Oui ou Non.

Si la réponse est oui, je souhaiterais qu'une textbox1 se créer juste à coté pour pouvoir y inserer une valeur.

Si la réponse est non, rien ne se passe.

Quelqu'un pourrait il me donner le code VBA correspondant?

Merci de votre aide,

Julien974
 
Re : Faire apparaître une textbox selon critère dans Userform

Bonjour

peut-être dans ce style

Code:
Private Sub ComboBox1_Change()
If Me.ComboBox1.Value = "Oui" Then
Me.TextBox1.Visible = True
Else
Me.TextBox1.Visible = False
End If

End Sub
 
Re : Faire apparaître une textbox selon critère dans Userform

bonjour Julien,

Mettre un textbox avec la propriété Visible à False sur le userForm puis:

sub ComboBox1_Click()
TextBox1.Visible=ComboBox1.Value="Oui"
end sub

A bientôt

[Edit] Hello Pascal, content de te croiser
 
Dernière modification par un modérateur:
Re : Faire apparaître une textbox selon critère dans Userform

Bonjour

pour cela, tu crees ta textbox par avance, et tu lui affecte false à la propriete visible

ensuite si ta combobox pas = Vrai, tu modifies la propriete Visible de la textbox

la macro evennementielle su changement de la combobox (à adapter)
Code:
Private Sub ComboBox1_Change()
    If ComboBox1.Text = "TRUE" Then TextBox1.Visible = True Else TextBox1.Visible = False
End Sub

Edit : Oups il y a du monde, Bonjour Pascal, Hasco, desolé pour la collision
 
- 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

J
Réponses
1
Affichages
923
  • Question Question
Microsoft 365 List View
Réponses
26
Affichages
3 K
  • Question Question
Microsoft 365 Protect/Unprotect
Réponses
18
Affichages
3 K
Y
Réponses
4
Affichages
1 K
YoanRey
Y
Retour