Incrémenter nom de variable

Bonjour à tous, voila mon problème :
Comment incrémenter un nombre faisant parti du nom de la variable ?
Par exemple faire une action sur variable1, variable2, variable3 ... variable51 en utilisant une boucle FOR.

Dans ma situation, je ne peux pas utiliser un tableau puisque la variable à incrémenter est le nom d'un TEXTBOX dans un FORM.
Concrètement, voila ce que je fais :

Code:

---

1 2 3 4

ThisWorkbook.Worksheets(4).Range("A" & ligne) = TextBox1.Text ThisWorkbook.Worksheets(4).Range("B" & ligne) = TextBox2.Text ThisWorkbook.Worksheets(4).Range("C" & ligne) = TextBox3.Text ThisWorkbook.Worksheets(4).Range("D" & ligne) = TextBox4.Text

---

La prochaine version de ma macro comportera 36 éléments... c'est quand même mieux une boucle for de 1 ligne que 36 lignes à la c** !

Merci d'avance

Bonjour,


voici un exemple d'un test en cours,

Code:

---

1 2 3 4 5

For I = 1 To 5 'initialise les combos BB For Each cell In Worksheets("BaseListes").Range("Toto") If cell.Value <> "DG-Solutions" Then Me.Controls("cboTypeBB" & I).AddItem cell.Value Next cell Next I

---

regardes dans la FAQ, tout est expliqué et largement présent ;)

cordialement,

Didier

Bonjour
si tes textbox nommées TextBoxi correspondant à la colonne i

Code:

---

1 2 3 4 5

Dim i As Byte   For i = 1 To 36 ThisWorkbook.Worksheets(4).Cells(ligne, i) = Me.Controls("TextBox" & i).Text Next i

---

Merci à vous 2, ça marche nickel !
Et par curiosité, cette commande "Me.Controls" , c'est quoi en C ? Pascal ?
Encore pour votre réactivité !

Citation:

---

Envoyé par aide VBA

Controls, collection

Chaque contrôle appartenant à la collection Controls possède en tant qu'objet un index unique dont la valeur peut être un nombre entier ou une chaîne. La valeur d'index du premier contrôle d'une collection est 0 ; la valeur du deuxième contrôle est 1, etc. Cette valeur indique l'ordre dans lequel les contrôles ont été ajoutés à la collection.

Si l'index est une chaîne, il représente le nom du contrôle. La propriété Name d'un contrôle spécifie aussi un nom de contrôle.

Vous pouvez utiliser la collection Controls pour énumérer ou compter individuellement les contrôles et pour définir leurs propriétés. Par exemple, vous pouvez énumérer la collection Controls d'une feuille particulière et affecter à la propriété Height de chaque contrôle une valeur particulière.

Note L'instruction For Each...Next est utile pour énumérer une collection.

---

Me se réfère à l'objet parent du contrôle, ici l'Userform.

Citation:

---

Envoyé par aide VBA

Me
Voir aussi

Le mot clé Me se comporte comme une variable déclarée de façon implicite. Il est automatiquement disponible pour toutes les procédures d'un module de classe. Lorsqu'une classe peut comporter plusieurs instances, le mot clé Me offre la possibilité de faire référence à l'instance de la classe dans laquelle le code est exécuté. Il s'avère particulièrement utile pour passer les informations concernant l'instance d'une classe en cours d'exécution à une procédure d'un autre module. Par exemple, supposez que la procédure suivante se présente dans un module :

---

PS : à savoir que les modules de feuilles, USF, Workbook sont des modules de classe particuliers.

cordialement,

Didier