Passer au contenu principal

Comment dimensionner automatiquement la zone de commentaire pour l'adapter à son contenu dans Excel?

Auteur : Xiaoyang Dernière modification: 2020-05-25

Lorsque vous insérez des commentaires dans des cellules, la taille de la zone de commentaire est la taille par défaut. Si vous y entrez beaucoup de contenu, une partie du contenu ne sera pas visible directement. Est-il possible d'adapter automatiquement la taille de la zone de commentaire à son contenu?

Boîte de commentaire à taille automatique pour adapter son contenu dans une feuille de calcul
Zone de commentaire à taille automatique pour adapter son contenu dans une plage de cellules
Boîte de commentaires facilement dimensionnée automatiquement pour adapter son contenu à la feuille active ou à toutes les feuilles avec un outil incroyable


Boîte de commentaire à taille automatique pour adapter son contenu dans une feuille de calcul

Dans Excel, vous pouvez faire glisser manuellement la zone de commentaire vers la taille de vos besoins, mais si de nombreuses zones de commentaire doivent être redimensionnées, cette méthode sera fastidieuse et prend du temps. Dans ce cas, vous pouvez appliquer le code VBA suivant.

1. Maintenez le ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez insérer > Moduleet collez la macro suivante dans le Fenêtre du module.

Code VBA: zones de commentaire à taille automatique dans une feuille de calcul

Sub FitComments()
'Updateby20140325
Dim xComment As Comment
For Each xComment In Application.ActiveSheet.Comments
    xComment.Shape.TextFrame.AutoSize = True
Next
End Sub

3. Appuyez ensuite sur F5 clé pour exécuter ce code, et toutes les zones de commentaires de la feuille de calcul active ont été redimensionnées pour s'adapter à leur contenu comme illustré ci-dessous:

doc taille automatique comment1

Conseil : Ce code ne fonctionne que dans la feuille de calcul actuelle et ne peut pas redimensionner automatiquement les nouvelles zones de commentaires que vous ajoutez.


Un clic pour adapter rapidement la taille de la zone de commentaire à son contenu automatiquement dans Excel:

Le plus Commentaire d'ajustement automatique utilité de Kutools for Excel peut aider à adapter rapidement la taille de la zone de commentaire à son contenu automatiquement dans une feuille de calcul comme le montre la démonstration ci-dessous. Téléchargez et essayez-le maintenant! (essai gratuit de 30 jours)


Zone de commentaire à taille automatique pour adapter son contenu dans une plage de cellules

Si vous avez juste besoin de dimensionner automatiquement une plage de zones de commentaire de cellule, vous pouvez utiliser le code VBA suivant.

1. Maintenez le ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez insérer > Moduleet collez la macro suivante dans le Fenêtre du module.

Code VBA: boîtes de commentaires à taille automatique dans une plage de cellules

Sub Fitrangecomments()
'Updateby20140325
Dim rng As Range
Dim WorkRng As Range
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each rng In WorkRng
    If Not rng.Comment Is Nothing Then
        rng.Comment.Shape.TextFrame.AutoSize = True
    End If
Next
End Sub

3. Appuyez ensuite sur F5 pour exécuter ce code, et une boîte de dialogue apparaîtra pour vous rappeler de sélectionner une plage de cellules que vous souhaitez redimensionner les zones de commentaire, voir capture d'écran:

doc-resize-comment-box3

4. Et puis cliquez sur OK, les zones de commentaire de cellule sélectionnées ont été automatiquement adaptées au contenu des commentaires.

Conseil : Ce code ne peut pas redimensionner automatiquement les nouvelles boîtes de commentaires que vous ajoutez.


Boîte de commentaire à taille automatique pour adapter son contenu à la feuille active ou à toutes les feuilles 

Vous pouvez essayer de l' Commentaire AutoFit utilité de Kutools for Excel pour redimensionner automatiquement unToutes les zones de commentaires dans la feuille active ou toutes les feuilles dans Excel. Veuillez faire comme suit.

Avant d'appliquer Kutools for Excel, S'il vous plaît téléchargez et installez-le d'abord.

1. Pour redimensionner automatiquement les zones de commentaires afin qu'elles correspondent à leur contenu dans la feuille active, cliquez sur Kutools > Plus > Commentaire AutoFit > Feuille active.

Et si vous souhaitez redimensionner automatiquement toutes les zones de commentaires dans tout le classeur, cliquez sur Kutools > Plus > Commentaire AutoFit > Toutes les feuilles. Voir la capture d'écran:

Ensuite, toutes les zones de commentaires sont automatiquement redimensionnées pour s'adapter à leur contenu. Voir la capture d'écran:

Notes:

  • 1. Après avoir redimensionné automatiquement les zones de commentaire, lorsque vous modifiez à nouveau le commentaire, la zone de commentaire s'agrandira ou se réduira automatiquement avec le contenu.
  • 2. Pour les nouveaux commentaires que vous avez insérés, vous devez réactiver cet utilitaire de commentaire AutoFit pour redimensionner toutes les nouvelles zones de commentaires insérées.

  Si vous souhaitez bénéficier d'un essai gratuit (30 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis passez à appliquer l'opération selon les étapes ci-dessus.


Boîte de commentaire facilement taille automatique pour s'adapter à son contenu


Articles Liés:

Meilleurs outils de productivité bureautique

🤖 Aide à l'IA Kutools: Révolutionner l'analyse des données en s'appuyant sur : Exécution intelligente   |  Générer du code  |  Créer des formules personnalisées  |  Analyser les données et générer des graphiques  |  Invoquer les fonctions Kutools...
Caractéristiques populaires: Rechercher, mettre en évidence ou identifier les doublons   |  Supprimer les lignes vides   |  Combinez des colonnes ou des cellules sans perdre de données   |   Tour sans formule 
Super recherche: VSearchup à critères multiples    VSearch à valeurs multiples  |   Recherche virtuelle sur plusieurs feuilles   |   Recherche floue ....
Liste déroulante avancée: Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple ....
Gestionnaire de colonnes: Ajouter un nombre spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages et les colonnes 
Caractéristiques en vedette: Mise au point de la grille   |  Voir Design   |   Grande barre de formule    Gestionnaire de classeurs et de feuilles   |  Ressources (Texte automatique)   |  Sélecteur de date   |  Combiner des feuilles de travail   |  Crypter/déchiffrer les cellules    Envoyer des e-mails par liste   |  Super filtre   |   Filtre spécial (filtre gras/italique/barré...) ...
Les 15 meilleurs ensembles d'outils12 Texte Outils (Ajouter du texte, Supprimer les caractères, ...)   |   50+ Graphique Types (Diagramme de Gantt, ...)   |   40+ Pratique Formules (Calculer l'âge en fonction de l'anniversaire, ...)   |   19 Insertion Outils (Insérer le code QR, Insérer une image à partir du chemin, ...)   |   12 Conversion Outils (Nombres en mots, Conversion des devises, ...)   |   7 Fusionner et fractionner Outils (Lignes de combinaison avancées, Cellules divisés, ...)   |   ... et plus

Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps.  Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...

Description


Office Tab apporte une interface à onglets à Office et facilite grandement votre travail

  • Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
Comments (19)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi. I've been using an xls spreadsheet for 10+ years. Suddenly, all my note boxes were hugely expanded, showed as a blank note until I edited them. Your solution below worked to resize all of my note boxes to fit contents. But now when I try to resize the note box to add more text, Excel crashes. This is even after I saved as an xlsx file to remove all VB code. Can you help?

Sub FitComments()
'Updateby20140325
Dim xComment As Comment
For Each xComment In Application.ActiveSheet.Comments
xComment.Shape.TextFrame.AutoSize = True
Next
End Sub
This comment was minimized by the moderator on the site
Bom-dia,

Salvou de mais! Após abrir planilha no celular todos os comentários ficaram desajustados no pc.
Tinha mais de 10 mil comentários pra arrumar o tamanho da caixa! Se tivesse pix eu até pagava! Obrigado.
This comment was minimized by the moderator on the site
It doesn't work, the insert module does not show up
This comment was minimized by the moderator on the site
amazing! thank you, the first way works! saved me hours of work!
This comment was minimized by the moderator on the site
I guess Crystal got us off track the question was: Is there a way of making the line from the comment box to the cell darker or fatter? That would be the line surrounding the comment box. TIA DD
This comment was minimized by the moderator on the site
Is there a way of making the line from the comment box to the cell darker or fatter?
This comment was minimized by the moderator on the site
Hi Demondrew,
Sorry can help you for that.
This comment was minimized by the moderator on the site
Thank you so much for sharing this. Really helpful!
This comment was minimized by the moderator on the site
@DENNIE "While the code works it makes the box one line high meaning that large comments disappear off-page somewhere. Could you give the code for fixing the width of each box (to let's say three standard Excel column widths) and auto-adjusting the length of the box to fit the text? Thanks." // Agreed
This comment was minimized by the moderator on the site
Thank you very much. This really saved me from lots of hassles.
This comment was minimized by the moderator on the site
While the code works it makes the box one line high meaning that large comments disappear off-page somewhere. Could you give the code for fixing the width of each box (to let's say three standard Excel column widths) and auto-adjusting the length of the box to fit the text? Thanks.
There are no comments posted here yet
Load More
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations