Zone de texte Visual Basic Excel

Résolu
Mik49a -  
 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
A voir également:

1 réponse

pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
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

0
Mik49a
 
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 !
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
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
0
Mik49a
 
Merci pour tes réponses rapides, les codes marchent parfaitement. :)
0