Simplifier une liste d'éléments.

kohta

XLDnaute Occasionnel
Bonjour, je dispose d'une usf comportant une 30aine de textbox, et j'aimerais juste savoir comment faire pour éviter d'avoir à taper les 30 noms à la suite, pour simplifier la saisie quand je crée un

if "toutes les textbox de l'usf" condition


Merci
 

Spitnolan08

XLDnaute Barbatruc
Re : Simplifier une liste d'éléments.

Bonjour,

Si bien compris, une solution simple :
Code:
Dim Compteur as integer
For i=1 to 30
If me.controls("Textbox" & i).value= .....then compteur=compteur +1
next
If Compteur = 30 then Msgbox("condition OK")
....
Cordialement
 

ftho

XLDnaute Occasionnel
Re : Simplifier une liste d'éléments.

Bonjour,

Le plus simple serait de nommer les TextBox : TextBox1, TextBox2, ..., TextBox30

Ensuite une petit boucle
Code:
With UserForm1 'ou With Me
For x = 1 to 30
If .Controls("TextBox" & x) = ... Then
...
End If
End With
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 895
Messages
2 093 383
Membres
105 714
dernier inscrit
POKITO