Vider plusieurs textbox VBA

Résolu

medbo Messages postés 570 Statut Membre -
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention - 11 avr. 2011 à 23:13

Bonjour,

je voudrais que lorsque j'appui sur un commandbouton d'un userform toutes les textbox soient vidées

quel est le code VBA pour ?

merci pour votre aide

--
c'est en s'entre-aidons que nous réussirons

Afficher la suite

2 réponses

Réponse 1 / 2

Meilleure réponse
La meilleure réponse est la réponse qui a été validée par nos équipes.
gbinforme Messages postés 14930 Date d'inscription Statut Contributeur Dernière intervention 4 744
bonjour

Si tes textbox ont gardé le nom par défaut, ceci devrait fonctionner, sinon tu adapte avec tes noms :
```
Dim ctr As Object
For Each ctr In Me.Controls
    If ctr.Name Like "TextBox*" Then ctr.Value = ""
Next
```
5
Réponse 2 / 2
eriiic Messages postés 24581 Date d'inscription Statut Contributeur Dernière intervention 7 281
Bonsoir tout le monde,

Tu peux aussi te baser sur le type de l'objet pour ne pas être tributaire des noms :
```
Private Sub CommandButton1_Click() 
    Dim Ctrl As Control 
    For Each Ctrl In Me.Controls 
        If TypeName(Ctrl) = "TextBox" Then Ctrl.Text = "" 
    Next Ctrl 
End Sub
```
eric
4

Vider plusieurs textbox VBA

2 réponses

Discussions similaires

Newsletters