Afficher TestBox ou combobox en fonction d'une textbox

[Joulsy]

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]

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

Bonjour joulsy,

voir fichier joint

à+
Philippe

 

[job75]

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 :

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]

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

Merci à vous deux