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

Résolu/Fermé
ouic01 Messages postés 17 Date d'inscription mardi 3 février 2015 Statut Membre Dernière intervention 13 avril 2019 - Modifié le 23 mars 2019 à 06:58
ouic01 Messages postés 17 Date d'inscription mardi 3 février 2015 Statut Membre Dernière intervention 13 avril 2019 - 24 mars 2019 à 19:50
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.

1 réponse

f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
23 mars 2019 à 08:24
Bonjour,

Ce code est dans l'userform ou dans un module?????
1
ouic01 Messages postés 17 Date d'inscription mardi 3 février 2015 Statut Membre Dernière intervention 13 avril 2019 14
Modifié le 23 mars 2019 à 14:23
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 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
Modifié le 23 mars 2019 à 17:42
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 mardi 3 février 2015 Statut Membre Dernière intervention 13 avril 2019 14
24 mars 2019 à 19:50
Effectivement, ça fonctionne beaucoup mieux, merci l'ami !
0