[VBA-E]modifier les attributs d'un commentaire dans une cellule

Version imprimable

voila je cherche à modifier les attributs d'un commentaire dans une cellule : ex couleur, gras, italique
Code:

1 2 3 4 5 6 7 8 9 10 Sub Macro2() Selection.Font.ColorIndex = 3 Selection.Font.Bold = True Selection.ClearComments 'efface le commentaire car si on écrit un commentaire sur une cellule ou il y a un commentaire : erreur ActiveCell.AddComment ActiveCell.Comment.Text Text:="Olivier:" & Chr(10) & "à vérifier" End Sub
dans la dernière ligne de code je voudrai mettre "Olivier" en gras, en rouge...mais comment faire ?? est ce possible

merci

Rien de plus enfantin (je plaisante ;-))

Code:

1
2
3
4
5
6
7
8
9
10
11
12
Dim TB As TextBox
 
With ActiveCell
   If Not .Comment Is Nothing Then .Comment.Delete
   With .AddComment("Olivier" & vbLf & "à vérifier")
      Set TB = .Shape.OLEFormat.Object
      With TB.Characters(1, 7).Font
         .Bold = True
         .Color = vbRed
      End With
   End With
End With

Bonne chance. :-)

15/03/2004, 10h26
Olivier vb

merci

merci
excatement ce que je voulais

par contre :
" Rien de plus enfantin " pour toi : pas pour moi