textbox visible

[apdf1]

Bonjour,

Voila j'ai un USF avec 100 textBox et une ComBobox, j'aimerais si possible avoir un code pour ma ComBobox qui me donne le nombre de textBox visible en sachant que les textBox marche par deux.

ex: Si je mentionne dans ma ComBobox le nombre" 8 " il faudrait avoir 16 textBox visible puisqu'il marche par deux.

Ci-joint mon fichier exemple

Je vous remercie par avance et vous souhaite une bonne fin d'après midi.

Cordialement

Max

 

[Papou-net]

Re : textbox visible

Bonjour apdf1,

Voici une solution (code à écrire dans l'événement Change de la ComboBox1) :

Private Sub ComboBox1_Change()
For n = 1 To 100
  Me.Controls("TextBox" & n).Visible = False
  If n <= CInt(ComboBox1.Value) * 2 Then Me.Controls("TextBox" & n).Visible = True
Next
End Sub

Espérant avoir répondu.

Cordialement.

 

[apdf1]

Re : textbox visible

Bonjour Papou-net

Je te remercie beaucoup cet exactement ma recherche.

Je te souhaite une bonne journée.

@+

Max