Nom textbox variable

Résolu/Fermé
pou pouille Messages postés 207 Date d'inscription mardi 20 octobre 2009 Statut Membre Dernière intervention 20 juillet 2012 - 14 déc. 2009 à 12:07
pou pouille Messages postés 207 Date d'inscription mardi 20 octobre 2009 Statut Membre Dernière intervention 20 juillet 2012 - 16 déc. 2009 à 11:03
Bonjour,
je souhaiterai savoir si il est possible de metre le nom d'une textbox variable j'ai 10 textbox et cela m'aiderai beaucoup de pouvoir écrir un code dans ce genre , le problème est que cela ne fonctionne pas ("surement dans la facon de l'écrire").
For i = 3 To 12
If TextBox & i.Visible = False Then
    Textbox & i+1.value=combobox2.Value
    Textbox & i+1.visible=True
    Exit Sub
End If
Next i
Par avance merci. Pou Pouille
A voir également:

4 réponses

Gord21 Messages postés 918 Date d'inscription samedi 21 novembre 2009 Statut Membre Dernière intervention 20 mars 2013 289
14 déc. 2009 à 12:50
Bonjour,
Tu ne peux pas utiliser cette syntaxe. Tu peux utiliser une syntaxe du type Controls(i) si tous tes TextBox se suivent ou par exemple, tu peux analyser le nom de tes TextBox (propriété Name)
1
pou pouille Messages postés 207 Date d'inscription mardi 20 octobre 2009 Statut Membre Dernière intervention 20 juillet 2012 31
14 déc. 2009 à 13:32
en effet mes textbox se suivent et portent des nom comme TextBox1 .. 2 .. 3 etc
merci je regarde avec le Controls(i) ce que je vai pouvoir faire
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 754
14 déc. 2009 à 14:33
Salut,
Voici un très bon lien que m'a passé Michel_m sur beaucoup beaucoup de codes VBA : lien. Ce site est très bien fait et très complet, n'hésite pas à surfer dessus...
0
pou pouille Messages postés 207 Date d'inscription mardi 20 octobre 2009 Statut Membre Dernière intervention 20 juillet 2012 31
16 déc. 2009 à 11:03
Merci bien pour ce lien je vais en apprendre encore :)
La méthode du Controls(i) marche nikel vu que j'ai des controls à modifier mais pas tout ceux d'un formulaire par exemple uniquement les textbox4à 15.. donc j'ai fait ce genre de boucle
for i=4 to 15
Nom="TextBox" & i
Controls(Nom).    'Fonctions...
Next i
0