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

1 réponse

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