multiple textbox vba

[racoon971]

Bonjour ,

j'ai 10 text_box qui porte les noms : Approved.AppCb_Y0, Approved.AppCb_Y1, Approved.AppCb_Y2, Approved.AppCb_Y3, Approved.AppCb_Y4 etc ... .
j'aimerais faire un boucle qui remplissent ces texbox , de cette facon : Approved.AppCbY_& " & Iter & " = "cool" mail j'ai une erreur avec vba.
Avez vous une idée ?
MErci

 

[pierrejean]

Re : multiple textbox vba

Bonjour racoon971

A tester:

for n=0 to 9
 Me.Controls("Approved.AppCb_Y" & n)="Cool"
next

 

[racoon971]

Re : multiple textbox vba

non , ca ne marche pas j'ai lerreur : "utlisiation non-valide du mot cle "Me"

 

[TempusFugit]

Re : multiple textbox vba

Bonjour


Ou as-tu mis le code VBA proposé par Pierrejean ?

Dans l'userform ?

Dans un module ?

Car il fonctionne s'il est mis dans le code de l'userform

Voir cet exemple générique (Un userform avec 3 Textbox )

Private Sub UserForm_Initialize()
For i = 1 To 3
Me.Controls("TextBox" & i) = "cool"
Next i
End Sub

 

[racoon971]

Re : multiple textbox vba

dans un module

 

[TempusFugit]

Re : multiple textbox vba

ReLis mon précédent message
Je viens de l'éditer

Il faut mettre le code dans l'userform.

Ou alors l'écrire autrement si tu le mets dans un module.

Sub macrodansmodule()
UserForm1.Show
For i = 1 To 3
UserForm1.Controls("TextBox" & i) = "cool"
Next i
End Sub

 

[racoon971]

Re : multiple textbox vba

Merci ca marche bien, par contre comment faire si apres je dois recupere ce qui il y dans les textbox sans passer par le userform ? (le test sera dans un module)

 

[racoon971]

Re : multiple textbox vba

Ok je viens de lire votre reponse ,
merci pour tout