bulles commentaires se déformant

[chifounou]

Bonjour, je passe du temps à redimmensionner mes bulles de commentaire afin de les adapter à la taille de mon texte de commentaires, je sauvegarde les changements mais inévitablement, plus ou moins rapidement, mes bulles de commentaires se déforment et leur format prend une forme impréhenvisible qui rend complètement illisible mon texte

Je joinds une image de la déformation qui survient épisodiquement sans que j'intervienne

Cela me fait profondément rager. D'où viennent ces déformations intempestives alors que je ne touche à rien ?! Merci de votre aide

 

[DoubleZero]

Bonjour, chifounou, le Forum,

Une suggestion avec le code ci-après.

Option Explicit
Sub Commentaire()
    Dim c As Comment
    Application.ScreenUpdating = False
    For Each c In ActiveSheet.Comments
        c.Shape.TextFrame.AutoSize = True
    Next
    Application.ScreenUpdating = True
End Sub

A bientôt 🙂

 

[chifounou]

Merci DoubleZero mais où dois-je mettre le code ? A la racine de la feuille ou est-ce une macro que je dois exécuter une seule fois ?

 

[DoubleZero]

Re-bonjour,

Logé dans un module standard, il peut être utilisé pour chaque onglet du fichier.

Placé dans les macros personnelles, il peut servir pour tout fichier.

A bientôt 🙂

 

[chifounou]

He he remarque prise en compte !

Pour info, j'habite un pays beaucoup plus libéral que la France sur ce sujet, où l'on évite de brainwasher les gens 😉 mon pays n'a presqu'aucun impôt (toute première fois en 2016) et 1,25% de chômage (en baisse) et s'amuse souvent des remarques venant de l'Europe 🙂. Très bonne journée

 

[chifounou]

@DoubleZero : merci pour ta précieuse aide qui apparemment a résolu le problème. Bon weekend