Famille de feuilles de calcul Microsoft avec des outils pour l’analyse, le graphique et la communication des données.
Essaie :
Sub test1()
Dim C As Comment, Sh As Worksheet
For Each Sh In Worksheets
For Each C In ActiveSheet.Comments
C.Shape.TextFrame.Characters.Font.Name = "Tahoma"
Next C
Next Sh
End Sub
Si tu as un problème avec l'utilisation des macros, dis-le.
Daniel