Boucle en VBA

Résolu

Marvin.R Messages postés 17 Statut Membre -
eriiic Messages postés 25847 Statut Contributeur - 1 nov. 2012 à 23:43

Bonsoir,

J'ai plusieurs zones de saisis (textBox) dans ma userForm. J'aimerai boucler sur chacun d'eux.

for i = 1 to 50

Je leur ai donné à chacun le même nom suivi d'un chiffre pour les différencier : textBox1 à textBox50

Ce que je ne sais pas comment faire, c'est selectionner la 1ère textBox à la 1ère boucle, puis la 2nd textBox à la 2nd boucle...

J'ai essayé

for i = 1 to 50
textBox(i) ...

mais ça ne fonctionne pas

Afficher la suite

A voir également:

Boucle en VBA
Excel compter cellule couleur sans vba - Guide
Télé samsung s'éteint et se rallume en boucle - Forum Téléviseurs
Mon pc s'allume et s'éteint en boucle ✓ - Forum Matériel & Système
Find vba - Astuces et Solutions
Vlc lire en boucle ✓ - Forum Lecteurs et supports vidéo

1 réponse

Réponse 1 / 1

f894009 Messages postés 17413 Statut Membre 1 715

Bonjour,

Au plus simple:
ex:

Private Sub CommandButton1_Click()
  For x = 1 To 50
    Me("textbox" & x) = x
  Next x
End Sub

Bonne suite

eriiic Messages postés 25847 Statut Contributeur 7 279

Bonsoir à tous,

un . a sauté...
Me.("textBox" & x) = x

eric

f894009 Messages postés 17413 Statut Membre 1 715

Bonjour eriiic,
Pas de point sauté, si vous le mettez il y a erreur de syntaxe.

Bye

eriiic Messages postés 25847 Statut Contributeur 7 279

Bonjour,

Ca me gène terriblement écrit sans . , même sans erreur de syntaxe.
Comme quoi s'il avait joint un fichier pour tester il aurait sa réponse plus rapidement et plus sûre.
Dans ce cas peut-être :
Me.Controls("textBox" & x) = x

eric

f894009 Messages postés 17413 Statut Membre 1 715

Re,
Me.Controls("textBox" & x) = x, c'est bon.
J'ai regarde dans l'aide VBA access, VB5.0 et VB6.0: la syntaxe, que j'utilise depuis tres longtemps, existe(implicite ou explicite).Par contre pas dans VBA Excel???? mais ca marche!!
Bye

eriiic Messages postés 25847 Statut Contributeur 7 279

Très intéressant, c'est beaucoup plus concis.
Du coup j'ai fait un classeur pour tester... ;-)
eric

Discussions similaires

Mon pc s'allume et s'éteint en boucle

Mon ordinateur s'allume et s'eteint en boucle

Erreur d'exécution 13 Incompatibilité de type

"L'indice n'appartient à la sélection" + VBA

Redmi redémarre en boucle - Fastboost impossible

Votre réponse

Discussions similaires