Incrémenter un grand nombre de textes dans des textbox ayant des noms variables

Résolu
ouic01 Messages postés 17 Date d'inscription   Statut Membre Dernière intervention   -  
ouic01 Messages postés 17 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Sur Excel en VBA, je souhaite incrémenter de nombreux textes dans de très nombreuses textbox ayant des noms variables

Mon besoin est le suivant :
j'ai 350 textbox dans un UserForm, qui sont nommées :
TextBox1, TextBox2, TextBox3, TextBox4, .... , TextBox350

je souhaite utiliser les valeurs d'une des feuilles du classeur suivant ce format :




afin de renseigner les TextBox respectives de façon automatique avec une macro.


Après de longues recherches, j'ai essayé ceci :


Sub test()

Dim a As Integer
Dim i As Integer

Sheets("Feuille1").Select

i = Range("B" & a).Value

For a = 2 To Range("A999").End(xlUp).Row
Me.Controls("textBox" & i).Text = Range("D" & a).Text
Next

End Sub


mais j'obtiens le message d'erreur suivant : "utilisation incorrecte du mot clé Me"

J'ai presque tout essayé, en vain...

Toute aide sera la bienvenue, merci d'avance.
A voir également:

1 réponse

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Ce code est dans l'userform ou dans un module?????
1
ouic01 Messages postés 17 Date d'inscription   Statut Membre Dernière intervention   14
 
Bonjour f894009,

ce code est dans un userform qui précède l'ouverture du userform contenant les textbox.
Le but étant d'implémenter les textbox du dernier userform à son ouverture.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,
un userform qui précède l'ouverture du userform contenant les textbox.

Remplacez Me par le nom de l'userform de destination
0
ouic01 Messages postés 17 Date d'inscription   Statut Membre Dernière intervention   14
 
Effectivement, ça fonctionne beaucoup mieux, merci l'ami !
0