slt tt le monde j'ai une vingtaine de textboxs dans une page (de multipage) et je voudrai savoir si ca existe une commande qui fait un "reset" pour tous ces textboxs.
NB: j'ai utilisé cette methode : textbox.visible= " " mais ca prend bcp de temps si vs avez une réponse n'hésitez pas svp
@++
slt tt le monde j'ai une vingtaine de textboxs dans une page (de multipage) et je voudrai savoir si ca existe une commande qui fait un "reset" pour tous ces textboxs.
NB: j'ai utilisé cette methode : textbox.visible= " " mais ca prend bcp de temps si vs avez une réponse n'hésitez pas svp
@++
je voulais dire textbox.value= " " et non textbox.visible
e2prom
Posté le 18-10-2005 à 19:33:31
Si tu as une vingtaine de TextBox, et que par chance elles s'appellent toujours TextBox1, TextBox2 etc...ou tb1,tb2...
Tu peux faire ça
For i = 1 to 20
userform1.Controls("TextBox" & i) = ""
Next i
For Each ctrl In Controls
If TypeOf ctrl Is MSForms.textbox Then
ctrl.Value = ""
End If
Next
tunisiano8
Murphy is back
Posté le 20-10-2005 à 09:41:52
merci e2prom,
mais cette commande efface les valeurs des textboxs même dans les autres pages.
watashi
La démotivation : JAMAIS !
Posté le 20-10-2005 à 16:59:51
salut tunisiano,
ton idée de bouton réinitialisé m'a inspiré du coup j'ai vu qu'en fait tu peux mettre avant le controls l'endroit précis où tu cherches à modifier la valeur.
Code :
Dim ctrl As Control
For Each ctrl In Userform01.MultiPage2.Pages(2).Controls
If TypeOf ctrl Is MSForms.TextBox Then
ctrl.Value = ""
End If
Next
bon courage
---------------
Je bidouillle c'est sur... Mais j'essaye de faire en sorte que ça marche ;-)
e2prom
Posté le 20-10-2005 à 18:59:01
Tout à fait.
On peut aussi écrire .....MultiPage2("page2" ).Controls
watashi
La démotivation : JAMAIS !
Posté le 20-10-2005 à 19:16:46
au fait merci e2prom même si tu as pas répondu à un de mes post l'astuce que tu as donné ici m'a bien servi
---------------
Je bidouillle c'est sur... Mais j'essaye de faire en sorte que ça marche ;-)