Boucle For Each Next sur une collection de TextBox
2 réponses
imej-clavier
Bonjour,
Quelqu'un peut-il me dire comment faire une boucle For Each Next sur une
collection de TextBox
J'ai essayé For Each TextBox In TextBox(i), mais cela ne marche pas.
Sub zzz() Dim Ctrl As MSForms.Control For Each Ctrl In UserForm1.Controls If TypeOf Ctrl Is MSForms.TextBox Then MsgBox Ctrl.Name Next Ctrl End Sub
AV
michdenis
Bonjour imej-clavier,
En supposant que tu connaisses le nombre de textbox et que leur index se suive :
For a = 1 to 5 Msgbox Me.Controls("Textbox" & a).text next
Salutations!
"imej-clavier" a écrit dans le message de news:% Bonjour, Quelqu'un peut-il me dire comment faire une boucle For Each Next sur une collection de TextBox J'ai essayé For Each TextBox In TextBox(i), mais cela ne marche pas.
D'avance merci
Jean-michel
Bonjour imej-clavier,
En supposant que tu connaisses le nombre de textbox et que leur index se suive :
For a = 1 to 5
Msgbox Me.Controls("Textbox" & a).text
next
Salutations!
"imej-clavier" <imej-clavier@wanadoo.fr> a écrit dans le message de news:%23xP6rxCsEHA.4008@TK2MSFTNGP14.phx.gbl...
Bonjour,
Quelqu'un peut-il me dire comment faire une boucle For Each Next sur une
collection de TextBox
J'ai essayé For Each TextBox In TextBox(i), mais cela ne marche pas.
En supposant que tu connaisses le nombre de textbox et que leur index se suive :
For a = 1 to 5 Msgbox Me.Controls("Textbox" & a).text next
Salutations!
"imej-clavier" a écrit dans le message de news:% Bonjour, Quelqu'un peut-il me dire comment faire une boucle For Each Next sur une collection de TextBox J'ai essayé For Each TextBox In TextBox(i), mais cela ne marche pas.
