Incrémenter un grand nombre de textes dans des textbox ayant des noms variables [Résolu/Fermé]

Signaler
Messages postés
17
Date d'inscription
mardi 3 février 2015
Statut
Membre
Dernière intervention
13 avril 2019
-
Messages postés
17
Date d'inscription
mardi 3 février 2015
Statut
Membre
Dernière intervention
13 avril 2019
-
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

Messages postés
15524
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 janvier 2021
1 437
Bonjour,

Ce code est dans l'userform ou dans un module?????
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 63550 internautes nous ont dit merci ce mois-ci

Messages postés
17
Date d'inscription
mardi 3 février 2015
Statut
Membre
Dernière intervention
13 avril 2019
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.
Messages postés
15524
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
21 janvier 2021
1 437
Re,
un userform qui précède l'ouverture du userform contenant les textbox.

Remplacez Me par le nom de l'userform de destination
Messages postés
17
Date d'inscription
mardi 3 février 2015
Statut
Membre
Dernière intervention
13 avril 2019
14
Effectivement, ça fonctionne beaucoup mieux, merci l'ami !