Changer valeurs TextBox Vba Excel

Résolu/Fermé

stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 - 11 juil. 2010 à 14:54
stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 - 11 juil. 2010 à 19:52

Bonjour,

J'ai un formulaire excel 2003 sur lequel j'ai créé 30 TextBox n'ayant pas tous le même nom.
Je voudrais pouvoir effacer la valeur de mes TextBox par un simple clic sur un bouton.
Pour le moment le seul moyen que j'ai trouvé c'est attribuer la valeur vide à chaque TextBox ce qui me fait un long code.
Je cherche donc une boucle ou autre qui pourrait alléger code.
Merci

A voir également:

Changer valeurs TextBox Vba Excel
Changer dns - Guide
Liste déroulante excel - Guide
Si et excel - Guide
Changer clavier qwerty en azerty - Guide
Aller à la ligne excel - Guide

1 réponse

Réponse 1 / 1

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
11 juil. 2010 à 19:15

Ajoute un bouton sur le formulaire :

Private Sub CommandButton1_Click()

Dim Ctr As Control

For Each Ctr In Me.Controls
 If TypeOf Ctr Is MSforms.TextBox Then
  Ctr.Value = vbNullString
 End If
Next

End Sub

stef.roos Messages postés 73 Date d'inscription vendredi 21 mars 2008 Statut Membre Dernière intervention 20 décembre 2012 1
11 juil. 2010 à 19:52

Merci c'est parfaitement ce que je voulais.

Merci merci merci

Discussions similaires

Formule Excel : "SI" une cellule contient un mot, alors ?