noms de textbox variables

[Blafi]

Bonjour à tous et bon après-midi,

J'ai un petit pb que je n'arrive pas à résoudre malgré mes recherches sur ce forum...
J'ai un USF qui permet de rentrer des lignes de données comportant 2 listbox et 2 datepicker dont le nombre (de lignes) varie avec la valeur d'un spinbutton.
Il s'agit de faire varier dans une boucle for i=1 to 4 ...next, le nom de la listbox ou du DTpicker d'indice i (listbox1, listbox2, etc.. et DTpicker11, DTPicker 12 etc...)afin de rentrer des données dans un tableau VBA (array).

Pour être plus clair, je joins un fichier très simplifié dans lequel mon problème est expliqué et le code que j'ai commencé à écrire dans l'USF...

Merci d'avance à celui ou ceux qui peuvent apporter une lueur dans mon obscurité...
A bientôt.

 

[Blafi]

Re : noms de textbox variables

Re bonjour .. encore moi

Vraiment personne ne peut me donner la solution ?

merci d'avance...

 

[Staple1600]

Re : noms de textbox variables

Bonsoir

En te basant sur cette syntaxe

Dim i as Long
For i= 1 to 4
Me.Controls("TextBox" & i).Text="toto"
Next

 

[Blafi]

Re : noms de textbox variables

Merci staple1600, je vais essayer de m'en inspirer..
A++

 

[Banzai64]

Re : noms de textbox variables

Bonsoir

Essayes

For K = 1 To I
    
  'c'est à partir de là que ça cloche, lorsque je veux faire varier le nom de mes listbox et datepicker en fonction de i
    Données(K, 1) = Controls("NatureAct" & K)
    Données(K, 2) = Controls("FonctionTenue" & K)           
    Données(K, 3) = Controls("DTPicker" & ((10 * K) + 1))
    Données(K, 4) = Controls("DTPicker" & ((10 * K) + 2))
    
Next K

 

[Blafi]

Re : noms de textbox variables

Bonjour à tous,

Merci Banzai64 pour ton aide..
Maintenant que j'ai revu mon code, j'ai un nouveau pb : quand je lance ma macro , au moment de définir le tableau par Dim Données(i,4), VBA me donne un message d'erreur "Constante requise" en mettant en gras le i....

Il semblerait qu'on ne puisse définir un tableau avec une dimension qui serait une variable.. Dès lors, je ne sais comment faire...
Quelqu'un a-t-il la solution...
Merci et a++

 

[Banzai64]

Re : noms de textbox variables

Bonjour

Tout d'abord tu déclare ton tableau sans indice

Dim Données()

ensuite tu peux le redimensionner

ReDim Données(Indice1,Indice2)

 

[Blafi]

Re : noms de textbox variables

encore merci banzai64,

j'avais pensé à cette solution mais j'avais pas du faire ça bien car ça ne marchait pas...
Je réessaye ta solution...
A++