police de commentaire cellule

N

Nanou

Guest
Bonjour à tous,

qui peut me dire comment modifier la police de caractère des commentaires de cellule EXCEL par défaut ?

Merci d'avance
 

pat1545.

XLDnaute Accro
Salut,

par vba c'est possible comme ceci:

Sub Ajust_Commentaires()
Dim Wks As Worksheet, Cmt As Comment
For Each Wks In Worksheets
For Each Cmt In Wks.Comments
Cmt.Shape.OLEFormat.Object.AutoSize = True
With Cmt.Shape.OLEFormat.Object.Font
.Name = 'Tahoma'
.Size = 12
End With
Cmt.Shape.OLEFormat.Object.ShapeRange.Fill _
.ForeColor.SchemeColor = 42
Next Cmt
Next Wks
End Sub

Patrick
 

Discussions similaires

Réponses
17
Affichages
693
Réponses
24
Affichages
2 K

Statistiques des forums

Discussions
312 276
Messages
2 086 714
Membres
103 377
dernier inscrit
fredy45