Texte par défaut dans TextBox

Bonjour a tous !

Je suis en train d’élaborer un Userform lié a tout un tas de macro, et je me demandais si il était possible de prédéfinir un texte par défaut dans les TextBox

Cela donnerait quelque chose comme ceci :

Pièce jointe 181318

J'ai cherché dans les propriétés des TextBox mais malheureusement je n'ai rien trouvé de concluant :|


Merci d'avance de votre aide !

Bonjour,

Merci de la rapidité de la reponse !
Malheureusement j'avais deja trouvé ce paramètre mais je voudrais quelque chose plus comme un papier peint, ou l'utilisateur ne pourras pas interagir avec les caractères
Il pourra simplement ecrire ses valeurs par dessus :)

On trouve ce principe sur plusieurs sites, comme celui ci :
Pièce jointe 181320



et des lors que l'on écris dessus, le fond disparaît:
http://img11.hostingpics.net/thumbs/...56Capture2.jpg

Salut :)

C'est du bidouillage, mais essaye ça :

Code:

---

1 2 3 4 5 6 7 8

Private Sub TextBox1_Enter() If TextBox1.Text = "Nom" Then TextBox1.Text = "": TextBox1.ForeColor = vbBlack End Sub   Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If TextBox1.Text = "" Then TextBox1.Text = "Nom": TextBox1.ForeColor = RGB(200, 200, 200) End Sub

---

Je viens d'essayer chez moi, ça marche très bien :)

EDIT : j'ai oublié que tu dois tout rentrer en gris au début (via l'éditeur visuel du UserForm), soit le mettre dans l'événement :

Code:

---

1 2 3

Private Sub UserForm_Initialize() TextBox1.Text = "Nom": TextBox1.ForeColor = RGB(200, 200, 200) End Sub

---

Merciiiiiii beaucoup, c'est exactement ce que je recherchais !

Aha t'en fais pas je me doutais bien que ça allait être une bidouille du genre ;)

Et bien encore merci a toi, sur ce bonne journée :D