TextBox, texte par défaut, modifiable

Bonjour !

Je réalise un traitement de préparation de mail (sous Lotus) et j'ai pour consigne de laisser libre choix au corps du mail.
Je passe donc par un userform, et un textbox mais voici ma question.
Est-il possible de renseigner du texte (Mail typique du genre "Bonjour, vous trouverez ci-joint blablabla ..").
Quand je le fais :

Code:

---

1 2 3 4

Private Sub CorpsMail_Change() CorpsMail.MultiLine = True CorpsMail.Text = "Bonjour," & vbCrLf & vbCrLf & vbCrLf & "vous trouverez ci-joint les fichiers du mois de paie vous concernant." End Sub

---

Tout d'abord le texte ne s'affiche que lorsque j'appuie sur le clavier, et la textbox devient non modifiable alors que ma propriété Enable est à true.

Y a-t-il solution à mon problème ?

Merci d'avance !

Cdt, arkhang.

Bonjour,

il semble que tu n'est pas utilisé le bon événement... si ton textbox et sur une Userform, un peu de lecture :

http://silkyroad.developpez.com/VBA/UserForm/#LIV

Humm merci bien, j'ai bcp lu ! lol

Mais si j'ai bien compris, cela se passe donc dans initialize ?

Code:

---

1 2 3 4 5 6

Private Sub TxtMail_Initialize()   LblMail.Text = "Bonjour," & vbCrLf & vbCrLf & vbCrLf & "vous trouverez ci-joint les fichiers du mois de paie vous concernant."   End Sub

---

(LblMail fait réference à ma textbox)
J'ai essayé .value ou .text, mais cette fois ça ne me met plus du tout le texte, ça me laisse le champs vierge

C'est réglé !

Code:

---

1 2 3 4 5 6 7

Private Sub UserForm_Initialize()   LblMail = "Bonjour," & vbCrLf & vbCrLf & vbCrLf & "vous trouverez ci-joint les fichiers du mois de paie vous concernant."     End Sub

---

µMerci !