Discussion :

[Doubytchou]

Mesdames, Messieurs bonjour,

Je fais appèle à vos connaissances car je me heurte à un problème dans une macro...

Presentation globale du probleme :

Dans un userform j'ai une trentaine de textbox qui sont toutes nomées "Horaire1_1", "Horaire1_2", "Horaire1_3", "Horaire2_1","Horaire2_2".... (les chiffres represent une postion graphique dans ma userform)

j'aurais aimé arriver à ecrire par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
For x=1to7
   For y=1 to 4
       HoraireX_Y.value="Valeur calculé dans le reste du programme"
   Next
Next

Ca me permetterai de simplifier grandement mon programme car je fais pas mal de comparaison et de calcul avec ces textbox...

J'ai deja dans une autre macro, réussi à indexer des variables pour de la lecture de valeurs, de la façon suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
dim Data as integer
dim i as integer
 
For i=1 to 4
resultat=Data & i
next

Dans ce sens la ca fonctionne bien, par contre indexé des variables pour leurs affecter une valeur me pose problème.

En espérant avoir été assez clair

Par avance merci de votre aide

[Theze]

Bonjour,

Un truc dans le genre ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Dim I As Integer
Dim J As Integer
 
For I = 1 To 7
 
    For J = 1 To 4
 
        Me.Controls("Horaire" & I & "_" & J).Text = "ici la valeur !"
 
Next J, I

[joe.levrai]

Bonjour,

en passant par la collection des contrôles du userform, tu peux boucler via le nom

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
For x = 1 To 7
    For y = 1 To 4
        Me.Controls("Horaire" & x & "_" & y) = "Valeur calculé dans le reste du programme"
    Next y
Next x

EDIT : trop lent !

[unparia]

Bonjour
Cette phrase me laisse penser à la possibilité d'un malentendu en ce qui concerne la demande

par contre indexé des variables pour leurs affecter une valeur me pose problème

Peux-tu en préciser le sens exact ?
Car s'il est ce que je commence à deviner, la solution est un array de tes variables.

[Doubytchou]

Bonjour,

Merci Thez et Joe.levrai c'est exactement ce que je n'arrivait pas à faire.

Grace à vous j'ai pu condencer mon programme d'une centaine de lignes en seulement une dizaine!!!

Encore merci pour votre aide et la vitesse à laquelle vous avez repondu.

[Doubytchou]

Bonjour
Cette phrase me laisse penser à la possibilité d'un malentendu en ce qui concerne la demande

Peux-tu en préciser le sens exact ?
Car s'il est ce que je commence à deviner, la solution est un array de tes variables.

Bonjour,
Effectivement dans un module j'aurais utilisé un tableau, mais mon problème et plus precisement lié à l'ecriture de Textbox les unes a la suite des autres en "Automatique", juste en changeant un index.

Je me suis certainement mal exprimé.

Merci de votre interet à mon problème.