Bonjour a tous

Je voudrais savoir s'il est possible de creer une boucle sur 40 textbox situé sur une userform.

Donc en fait ma userform comporte exactement 41 textbox et je veux que la boucle se fasse sur mes 40 premieres textbox et pas sur la 41ème.

Mes 40 textbox sont sur 4 frames par groupe de 10 et la 41èmetextbox est directement sur la userform (information supplementaire si ça peut aider).

le code que je veux boucler est celui ci:


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Public Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
 
 
Application.ScreenUpdating = False
            TextBox1.Value = TimeValue(Left(Application.Text(TextBox1.Value, "00.00"), 2) _
        & ":" & Right(TextBox1.Value, 2))
        c = TextBox1.Value
       h1 = TextBox1.Value    'cette variable ne sert que pour la suite
       TextBox1.Value = Format(c, "hh\H mm")
 
End Sub
mais il ne fonctionne que pour une textbox.

Je ne sais pas si c'est possible car il s'execute sur l'evenement "TextBox_Exit"
Alors dois je mettre un code pour chaque textbox, ce qui allourdi en ligne de code ou estce possible de le boucler.

Si quelqu'un peut m'aider.

Merci