Boucle pour affecter la valeur d'une textbox à une variable

[vivasss]

Bonjour,
j'ai fait quelques recherches mais je ne trouve pas la solution à mon problème. J'apprends mais je maîtrise pas encore toutes les nuances fonctions etc

Description :
J'ai 44 textbox :
22 textbox nommées ref1, ref2...ref22
22 textbox nommées ref1_2, ref2_2,.. ref22_2

Ma première question est :
Puis je faire une boucle pour créée 44 variables (refr1,....refr22) puis (refnb1,...,refnb22) ou dois taper
public refr1 as integer
public refnb1 as integer
?

Ma seconde question :
Puis je faire une boucle pour affecter la valeur de ref1 à la variable refr1 et la valeur de ref1_2 à la variable refnb1 ?
J'ai essayé plusieurs solutions mais apparemment ca ne va pas
exemple :
For i = 1 to 22
"refr" & i = "ref" i
Ou alors avec variable tampon
For i =1 to 22
a = Controls("ref" & i).value

mais ensuite je ne sais comment affecter "a" à "refr i"
ni comment affecter à une variable b la valeur de b = Controls("ref" &i "_2).value, je crois que j'ai un probleme dans la parenthése du controls
Mais sans sucés.
J'ai vu apparemment qu'on pouvait utiliser des tableaux mais j'avoue ne pas maîtriser ce type d'objet :/
Voila j’espère que vous allez pouvoir m'aider et je vous en remercie d'avance.

 

[Pierrot93]

Re : Boucle pour affecter la valeur d'une textbox à une variable

Bonjour,

pas tout compris de ton besoin.. petit exemple ci-dessous de déclaration et d'alimentation d'un tableau...

Dim t(1 To 44) As Variant, i As Integer
For i = 1 To 44
    t(i) = "ref" & i
Next i

bonne journée
@+

 

[Paf]

Re : Boucle pour affecter la valeur d'une textbox à une variable

Bonjour vivasss et bonjour Pierrot93

Comme Pierrot93, pas tout compris, mais quelques précisions supplémentaires et concrètes sur le besoin et un classeur sans données confidentielles seraient bien utiles.

A+

 

[vivasss]

Re : Boucle pour affecter la valeur d'une textbox à une variable

Bonjour,
tout d'abord merci de vos réponses !
@Pierrot, c'est ce que je voulais faire ca m'évite de faire des variables, le tableau me servira de variable !
Cela répond en fait à mes deux questions d'un coup !
Juste une dernière chose :
Si je veux faire la même chose avec des textbox nommé ref1_2, ref2_2, ref3_3
Comment se place les guillemets et le & ??
Merci encore

 

[Pierrot93]

Re : Boucle pour affecter la valeur d'une textbox à une variable

Re,

peut être ceci :

Dim t(1 To 44) As Variant, i As Integer
For i = 1 To 44
    t(i) = Me.Controls("ref1_" & i)
Next i

 

[vivasss]

Re : Boucle pour affecter la valeur d'une textbox à une variable

Je me suis mal exprimé Pierrot !
Désolé !
ref1_2, ref2_2, ref3_2
le chiffre qui bouge est celui avant le tiret du 8 !
Le 2 est fixe !
Est ce que tu as aussi une solution ?

 

[Pierrot93]

Re : Boucle pour affecter la valeur d'une textbox à une variable

Re,

Dim t(1 To 44) As Variant, i As Integer
For i = 1 To 44
    t(i) = Me.Controls("ref" & i & "_2"  )
Next i

 

[vivasss]

Re : Boucle pour affecter la valeur d'une textbox à une variable

Ha je ne connaissais pas l'astuce du double & !
Je te remercie bien ce sujet est résolu !
Bonne journée à toi !