Zone de texte Visual Basic Excel

Résolu
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

  1. Modérateur
    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
    1. 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
    2. Modérateur
      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
    3. Merci pour tes réponses rapides, les codes marchent parfaitement. :)
      0