Bonjour,
Je viens de zyeuter du côté d'Excelabo ou j'ai trouvé ceci :
Comment peut-on augmenter la taille de la police des commentaires ? Pour modifier par ex. la taille du commentaire (automatique), la police, la taille de la police, et la couleur de fond du commentaire:
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 = 10
End With
Cmt.Shape.OLEFormat.Object.ShapeRange.Fill _
.ForeColor.SchemeColor = 42
Next Cmt
Next Wks
End Sub
Je n'ai pas testé... et surtout il n'est pas indiqué où il faut faire ca : dans un classeur, dans le classeur modèle, dans perso.xls...
Message édité par: Brigitte, à: 13/01/2006 13:47