Comment effacer le contenu de la zone de texte lorsque vous cliquez sur Excel?

Normalement, pour effacer l'ancien contenu d'une zone de texte (contrôle ActiveX), vous devez entrer dans la zone de texte, sélectionner tout le contenu, puis appuyer sur la touche Retour arrière ou Suppr. Comment effacer rapidement tout le contenu dans une zone de texte? Cet article vous montrera une méthode VBA pour effacer rapidement le contenu d'une zone de texte en double-cliquant simplement dessus.

Effacer le contenu de la zone de texte lorsque vous cliquez avec le code VBA

---

Effacer le contenu de la zone de texte lorsque vous cliquez avec le code VBA

Le code VBA suivant peut vous aider à effacer rapidement le contenu d'une zone de texte en double-cliquant dessus. Veuillez faire comme suit.

1. Si une zone de texte existe déjà dans la feuille de calcul, activez le mode Conception en cliquant sur Développeur > Mode de conception. Voir la capture d'écran:

Ou vous pouvez également insérer une zone de texte en cliquant sur Développeur > insérer > Zone de texte (contrôle ActiveX). Voir la capture d'écran:

2. Cliquez avec le bouton droit sur la zone de texte et cliquez sur Voir le code dans le menu contextuel. Voir la capture d'écran:

3. Dans l'ouverture Microsoft Visual Basic pour applications fenêtre, veuillez remplacer le code VBA d'origine dans la fenêtre Code par le code VBA ci-dessous.

Code VBA: effacez le contenu d'une zone de texte en double-cliquant dessus

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
  If Not iGblInhibitTextBoxEvents Then
    TextBox1.Value = ""
  End If
End Sub

Notes: Dans le code, TextBox1 est le nom de la zone de texte dont vous effacerez le contenu. Veuillez le changer pour le vôtre.

4. appuie sur le autre + Q touches pour quitter Microsoft Visual Basic pour applications fenêtre.

5. Désactivez le mode de conception.

Désormais, en double-cliquant sur une zone de texte, son contenu sera immédiatement effacé.

---

Articles Liés:

• Comment sélectionner automatiquement le texte d'une zone de texte lorsqu'elle est sélectionnée dans Excel?
• Comment remplir automatiquement une zone de texte lors de la saisie dans Excel?
• Comment concaténer des textes de plusieurs cellules dans une zone de texte dans Excel?
• Comment désactiver l'édition dans la zone de texte pour empêcher la saisie de l'utilisateur dans Excel?
• Comment formater une zone de texte en pourcentage dans Excel?