[VBA-E]mise en forme commentaire

bonjour,
je cherche comment inserer un commentaire, mais avec la 1ere ligne en gras (contient le username de celui qui met le commentaire) et les autres en normal;

Code:

---

1 2 3 4 5 6

ActiveCell.AddComment ActiveCell.Comment.Visible = False With ActiveCell.Comment ... heuh ...   ActiveCell.Comment.Text Text:=Environ("username") + vbcrlf + maStringCommentaire

---

Code:

---

1 2 3 4 5 6 7 8

If Not ExisteCommentaire Then ActiveCell.AddComment End If ActiveCell.Comment.Visible = True ActiveCell.Comment.Text Text:="ceci est mon commentaire" ActiveCell.Comment.Shape.Select Selection.Characters(1, 4).Font.FontStyle = "Bold" ActiveCell.Comment.Visible = False

---

affichera :
ceci est mon commentaire