Initialiser tous les champs de texte dans un formulaire UserForm, Excel VBA

Après avoir saisi et enregistré une phrase, vous voulez vous assurer que le contenu de tous les champs de texte peut être supprimé si nécessaire. Pour ce faire, double-cliquez sur le bouton FERMER dans l’UserForm. Ensuite, écrivez la macro suivante.

Private Sub CommandButton3_Click ()
  Dim tb As Object
     For Each tb In UserForm1.Controls
       If TypeName (tb) = "TextBox" Then tb.Text = ""
    Next tb
End Sub

Commencez par déclarer une variable d’objet afin de pouvoir ensuite parcourir l’UserForm dans une boucle For Each et la nettoyer.

S’abonner
Notifier de
0 Commentaires
le plus ancien
le plus récent le plus populaire
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x