Zone de texte Visual Basic Excel

[Résolu/Fermé]
Signaler
-
 Mik49a -
Bonsoir, j'ai crée une zone de texte dans Visual Basic Editor sur Excel, et je voudrais afficher un texte dans la case (exemple "nom") et lorsque l'utilisateur clique dans la case afin d'éditer le champ, le texte disparait automatiquement (sans avoir à le sélectionner).
Si quelqu'un connait le code, je suis preneur.

Merci d'avance pour vos réponses

Cordialement, Mikaël

1 réponse

Messages postés
12251
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
17 mars 2021
2 628
Bonjour,
1- Indiquer dans la propriété "value" du textbox : nom (par exemple)
2- Insérer ce code dans l'évènement "mouseDown" de votre textbox :
Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If TextBox1.Value = "nom" Then TextBox1.Value = ""
End Sub

Merci beaucoup pijaku, je n'aurais jamais trouvé ! :)
Par contre, c'est possible de réafficher mon texte si l'utilisateur ne rentre aucune valeur ?
Encore merci !
Messages postés
12251
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
17 mars 2021
2 628
Oui bien sur. Tu peux utiliser l'évènement "exit" de ton textbox, par exemple. Comme ceci :
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If TextBox1.Value = "" Then TextBox1.Value = "nom"
End Sub
Merci pour tes réponses rapides, les codes marchent parfaitement. :)