Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Comment vider tous les textbox d'un Userform

Comment vider tous les textbox d'un Userform

16 réponses
Avatar
Steph
Bonjour,

Y a t'il moyen de vider en une fois, tous les textbox d'un UserForm ?

Merci

Steph
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
verificator
bonsoir Pascal,
OK, tout est rentré dans l'ordre
(j'avais peur de perdre la boule)
bonne soirée

-----Original Message-----
Bonjour
If TypeOf c Is MSForms.Textbox
devrait mieux convenir.
Cordialement
Pascal

"Pierre CFI [mvp]" a écrit
dans le message de

news:
bonjour
de mémoire
dim c as control
for each c in me.controls
if typeof c is textbox then c =""
next

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Steph" a écrit
dans le message de


news:

Bonjour,

Y a t'il moyen de vider en une fois, tous les textbox
d'un UserForm ?




Merci

Steph








.





Avatar
verificator
Pascal,
tu pouvais entrer, la porte était ouverte !
;-))))

-----Original Message-----
Heu Toc toc il y a quelqu'un ?
Voir ma petite suggestion faite à 17H45...
....si ça peut aider bien sûr ;-)

Cordialement
Pascal

"verificator" a écrit dans le
message de news:

2d0901c4ded9$274cf180$
non, pas de frame. (et XL 2000)

-----Original Message-----
salut verificator,

les textbox sont elles mit dans un frame du userform ?

isabelle


bonjour Isabelle,
j'ai testé la proc de Pierre sur un CmdBut de
userform,



comme la mienne. J'ai même essayé Userform1. en lieu
et



place de Me. aucun textbox ne semble être détecté par
le


typeOf c is textbox.
Probablement un micro-climat
PS - ne mouillons pas JPS dans cette histoire !

-----Original Message-----
c'est surenemt que la proc n'est pas mit dans un
événement du userform et qu'excel ignore qui est Me.


isabelle


tu cherches à me faire de la peine en l'absence de
jps ? pas joli :o)



--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"verificator" a écrit dans
le




message de news:0f2f01c4ded3$d7a9c630
$


bonjour Pierre, (re) Steph,

testé :
For Each c In Me.Controls
If TypeName(c) = "TextBox" Then c.Text = ""
Next

la proc de Pierre ne semble pas fonctionner chez
moi,




et
chez toi ?

-----Original Message-----
bonjour
de mémoire
dim c as control
for each c in me.controls
if typeof c is textbox then c =""
next

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Steph" a écrit
dans



le message de
news:

Bonjour,

Y a t'il moyen de vider en une fois, tous les
textbox




d'un UserForm ?

Merci

Steph





.

.



.






.









Avatar
isabelle
j'ai testé ce code sous xl2002 et n'ai pas eu de problème.

Private Sub UserForm_Initialize()
TextBox1.Value = "zaza"
TextBox2.Value = "zaza"
TextBox3.Value = "zaza"
End Sub

Private Sub CommandButton1_Click()
For Each c In UserForm1.Controls
If TypeName(c) = "TextBox" Then c.Text = ""
Next
End Sub

isabelle


non, pas de frame. (et XL 2000)

-----Original Message-----
salut verificator,

les textbox sont elles mit dans un frame du userform ?

isabelle


bonjour Isabelle,
j'ai testé la proc de Pierre sur un CmdBut de userform,
comme la mienne. J'ai même essayé Userform1. en lieu et
place de Me. aucun textbox ne semble être détecté par
le


typeOf c is textbox.
Probablement un micro-climat
PS - ne mouillons pas JPS dans cette histoire !

-----Original Message-----
c'est surenemt que la proc n'est pas mit dans un
événement du userform et qu'excel ignore qui est Me.


isabelle


tu cherches à me faire de la peine en l'absence de
jps ? pas joli :o)



--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"verificator" a écrit dans
le




message de news:0f2f01c4ded3$d7a9c630
$


bonjour Pierre, (re) Steph,

testé :
For Each c In Me.Controls
If TypeName(c) = "TextBox" Then c.Text = ""
Next

la proc de Pierre ne semble pas fonctionner chez
moi,




et
chez toi ?

-----Original Message-----
bonjour
de mémoire
dim c as control
for each c in me.controls
if typeof c is textbox then c =""
next

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Steph" a écrit
dans



le message de
news:

Bonjour,

Y a t'il moyen de vider en une fois, tous les
textbox




d'un UserForm ?

Merci

Steph





.

.



.












Avatar
isabelle
essaie avec c.Text = ""
on ne sait jamais.

isabelle


non, pas de frame. (et XL 2000)

-----Original Message-----
salut verificator,

les textbox sont elles mit dans un frame du userform ?

isabelle


bonjour Isabelle,
j'ai testé la proc de Pierre sur un CmdBut de userform,
comme la mienne. J'ai même essayé Userform1. en lieu et
place de Me. aucun textbox ne semble être détecté par
le


typeOf c is textbox.
Probablement un micro-climat
PS - ne mouillons pas JPS dans cette histoire !

-----Original Message-----
c'est surenemt que la proc n'est pas mit dans un
événement du userform et qu'excel ignore qui est Me.


isabelle


tu cherches à me faire de la peine en l'absence de
jps ? pas joli :o)



--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"verificator" a écrit dans
le




message de news:0f2f01c4ded3$d7a9c630
$


bonjour Pierre, (re) Steph,

testé :
For Each c In Me.Controls
If TypeName(c) = "TextBox" Then c.Text = ""
Next

la proc de Pierre ne semble pas fonctionner chez
moi,




et
chez toi ?

-----Original Message-----
bonjour
de mémoire
dim c as control
for each c in me.controls
if typeof c is textbox then c =""
next

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Steph" a écrit
dans



le message de
news:

Bonjour,

Y a t'il moyen de vider en une fois, tous les
textbox




d'un UserForm ?

Merci

Steph





.

.



.












Avatar
verificator
Isabelle,
il y a maldonne, je sais que ce code fonctionne, c'est
moi qui l'ai proposé à Steph. C'est celui de Pierre qui
me posait problème.
Tu verras plus bas que Papou a trouvé la solution.
bonne soirée
Avatar
isabelle
oup's p'tit confusion de ma part,
j'ai refait un autre test, cette fois ci avec .value et tout fonctionne parfaitement,

Private Sub CommandButton1_Click()
For Each c In UserForm1.Controls
If TypeName(c) = "TextBox" Then c.Value = ""
Next
End Sub

comme tu as dit "probablement un micro-climat"
et finalement on s'en sort très bien, même si JPS n'est pas dans cette histoire !;-)

isabelle



Isabelle,
il y a maldonne, je sais que ce code fonctionne, c'est
moi qui l'ai proposé à Steph. C'est celui de Pierre qui
me posait problème.
Tu verras plus bas que Papou a trouvé la solution.
bonne soirée


1 2