Comment définir une valeur par défaut dans une zone de texte ?
Vous pouvez insérer facilement une zone de texte dans une feuille de calcul, mais il arrive que vous souhaitiez y afficher une valeur par défaut pour rappeler aux autres utilisateurs d’entrer les informations appropriées. Avez-vous des idées pour accomplir cela dans Excel ?
Définir une valeur par défaut dans une zone de texte à l’aide d’un code VBA
Définir une valeur par défaut dans une zone de texte à l’aide d’un code VBA
Pour définir une valeur par défaut dans une zone de texte, le code VBA suivant peut vous aider :
1. Insérez une zone de texte en cliquant sur Développeur > Insérer > Zone de texte (contrôle ActiveX), puis dessinez la zone selon vos besoins. Voir la capture d’écran :

2.Cliquez ensuite avec le bouton droit sur la zone de texte et sélectionnez Afficher le codedans le menu contextuel, puis copiez et collez le code VBA suivant pour remplacer le code d’origine dans la fenêtre Microsoft Visual Basic pour Applications:
Code VBA : Définir une valeur par défaut dans une zone de texte :
Private Sub TextBox1_GotFocus()
If Me.TextBox1.Value = "" Then
Me.TextBox1.Value = "Your name, please!"
End If
End Sub

Remarque : Dans le code ci-dessus, Textbox1 est le nom de la zone de texte que vous avez insérée. Vous pouvez remplacer le texte par défaut « Votre nom, s’il vous plaît ! » par votre propre message.
3. Fermez ensuite la fenêtre de code, quittez le mode Création, et désormais, dès que vous cliquez dans la zone de texte, votre texte par défaut s’affiche automatiquement. Voir capture d’écran :

Articles associés :
Comment autoriser uniquement la saisie de chiffres dans une zone de texte ?
Comment appliquer la vérification orthographique à une zone de texte ?
Comment faire varier la couleur d’une zone de texte en fonction de sa valeur dans Excel ?
Comment insérer une image dans une zone de texte ?
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile
- Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels