Renseigner des variables indexées dans une macro (userform)

Version imprimable

05/02/2018, 17h02
Doubytchou

Renseigner des variables indexées dans une macro (userform)
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:

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:

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

Bonjour,

Un truc dans le genre ?

Code:

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

Bonjour,

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

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 ! :mrgreen:

05/02/2018, 19h45
unparia

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

Citation:

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.
06/02/2018, 10h01
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.
06/02/2018, 10h05
Doubytchou

Citation:

Envoyé par unparia

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.