Pb taille commentaire dans classeur partagé

Bonjour coco lapin,
Ce code peut-il taider ? Je n'en connais pas l'auteur, mais trouvé sur ce Forum.

Possibilité Largeur/Hauteur FIXE en macro évènementielle :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim CommentObj As Comment
For Each CommentObj In Me.Comments
With CommentObj.Shape
.Height = 25
.Width = 250
End With
Next
End Sub

Possibilité Largeur/Hauteur VARIABLE (AutoSize) :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim CommentObj As Comment

For Each CommentObj In Me.Comments
CommentObj.Shape.TextFrame.AutoSize = True
Next
End Sub

Bien à toi.

Bonjour Marc_du_78 et le forum.

Merci Marc pour ton code. Cela m'aidera si je suis obligé de réinitialiser à l'ouverture du classeur, mais c'est ce que je veux éviter.

Si je n'ai pas d'autres réponses je serai obligé de passer par là.