VBA- Boucles sur variables

[J3r3ms]

Bonjour,

Voici mon problème : j'ai plusieurs variables v1 v2 v3 v4 ... v12

représentant des textbox pour les douze mois de l'année...

je voudrai faire une boucle comme ceci :

for i=1 to NumérodeFin
v[i+mois] = "blabla"
Next i

où mois est le numéro du premier mois auquel s'applique le remplissage ( Month(Date) )

En gros je veux remplir seulement les textbox des mois futurs ( le nombre étant précisé) à une date donnée.

exemple : mai-2010 pour 6 mois

janvier : rien
fevrier : rien
mars : rien
avril : rien
mai : blabla
juin : blabla
juillet : blabla
aout : blabla
septembre : blabla
octobre : blabla
novembre : rien
decembre : rien

le coeur de la question est :
SOIT : peut t'on Convertir un string en variable ( convertir("v"&1) = v1 ( la variable v1 ) )

ou

peut t'on directement ecrire "v"&i...

 

[tototiti2008]

Re : VBA- Boucles sur variables

Bonjour,

V1, V2, V3 ... sont les noms de tes textbox ?

si oui

for i=1 to NumérodeFin
Userform1.Controls("v" & i + mois).text = "blabla"
Next i

Edit : Bonjour PierreJean 😉

 

[pierrejean]

Re : VBA- Boucles sur variables

Bonjour J3r3ms

La reponse est non
Pour autant ton probleme est loin d'etre insoluble
Creer un tableau(1 to 12) dans lequel tu mets a l'initialisation
tablo(1)="A mettre dans textbox Janvier"
tablo(2)="a mettre dans textbox février"
Tes textbox etant TextBox1 ,TextBox2, Textbox3,...
boucler de cette façon:
for n= 1 to 12
userformx.controls("Textbox" & n) =tablo(n)
next

Si ce n'est pas assez clair tu nous prepares un petit fichier exemple de ton probléme et on te trouvera une solution

Edit : Salut Tototiti

 

[J3r3ms]

Re : VBA- Boucles sur variables

j'ai résolu mon problème !

bon alors :

j'ai crée un variant : dim VariableMois(1 To 12) as Variant

j'ai fait ma boucle sur ce variant : for i=0 to Fin
VariableMois(i-1 + mois) = "blabla"
next i

puis j'ai fait : v1 = variablemois(1)
v2 = variablemois(2)

etc...

😀

EDIT : je viens de voir vos réponses, merci d'être aussi rapides !