Afficher TestBox ou combobox en fonction d'une textbox

Joulsy · 9 Août 2013

Bonjour à tous !
Je m'explique, En fait je cherche à ce que des textbox s'affiche sur mon Userform en fonction d'un nombre saisie dans une autre textbox :
En gros : Si textbox.value = 3, je voudrais que 3 textbox s'affichent = case 1 + case 2 + Case 3
Et si textbox.value = 7, 7 textbox s'affichent = Case 1 + ... + Case 7

Est ce que c'est possible, avec un Hide ?

Merci de votre aide

phlaurent55 · 9 Août 2013

Re : Afficher TestBox ou combobox en fonction d'une textbox

Bonjour joulsy,

voir fichier joint

à+
Philippe

job75 · 9 Août 2013

Re : Afficher TestBox ou combobox en fonction d'une textbox

Bonjour Jously,

Supposons que les TextBoxes à afficher se nomment Case1 Case2 Case3 etc...

Et que la TextBox de commande se nomme TB.

Alors coller dans le code de l'UserForm :

Code:

Private Sub TB_Change()
Dim c As Control, n As Integer
For Each c In Controls
  If c.Name Like "Case*" Then
    n = n + 1
    c.Visible = False
  End If
Next
For n = 1 To Application.Min(Val(TB), n)
  Controls("Case" & n).Visible = True
Next
End Sub

Edit : salut Philippe, à la bourre moi 🙂

A+

Joulsy · 12 Août 2013

Re : Afficher TestBox ou combobox en fonction d'une textbox

Merci à vous deux

Afficher TestBox ou combobox en fonction d'une textbox

Joulsy

XLDnaute Nouveau

phlaurent55

Nous a quittés en 2020

Pièces jointes

job75

XLDnaute Barbatruc

Joulsy

XLDnaute Nouveau

Discussions similaires

Afficher TestBox ou combobox en fonction d'une textbox

Joulsy

XLDnaute Nouveau

phlaurent55

Nous a quittés en 2020

Pièces jointes

job75

XLDnaute Barbatruc

Joulsy

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency