KutoolsforOffice — Une solution unique, cinq outils puissants.Faire plus avec moins d'efforts.Soldes de mars : 20 % de réduction

Comment modifier la couleur de l’indicateur de commentaire dans Excel ?

AuteurXiaoyang Date de modification

Par défaut, chaque fois que vous insérez un commentaire dans Excel, un petit triangle rouge apparaît dans le coin supérieur droit de la cellule, signalant clairement la présence d’un commentaire. Toutefois, selon vos besoins — qu’il s’agisse de respecter la charte graphique de votre entreprise, de mettre en place un système de catégorisation ou simplement de rendre les commentaires plus visibles dans des classeurs partagés — vous aurez souvent envie de personnaliser la couleur de ces indicateurs. Même si Excel ne propose pas d’option native pour modifier directement cette couleur, cet article vous présente une solution de contournement efficace et facile à mettre en œuvre grâce à un code VBA.

Modifier la couleur de l’indicateur de commentaire s’avère particulièrement utile dans les environnements collaboratifs ou lors de la gestion de feuilles de calcul complexes contenant de nombreux commentaires. Personnaliser ces indicateurs facilite l’organisation visuelle des retours, permet de distinguer les différents types de commentaires ou tout simplement d’adapter votre feuille de calcul à vos préférences pour un examen plus aisé. Vous trouverez ci-dessous des instructions détaillées ainsi que des remarques sur cette solution de contournement, accompagnées de conseils pour résoudre les problèmes courants, personnaliser le code VBA et explorer des méthodes alternatives si l’utilisation de macros est restreinte dans votre environnement.

Modifier la couleur de l’indicateur de commentaire avec du code VBA


Modifier la couleur de l’indicateur de commentaire avec du code VBA

Excel ne propose actuellement aucune fonctionnalité directe pour modifier rapidement la couleur des triangles indicateurs de commentaire. Toutefois, vous pouvez utiliser VBA afin de superposer astucieusement une forme triangulaire colorée sur l’indicateur par défaut, transformant ainsi son apparence visuelle. Cette méthode s’applique à toutes les cellules contenant un commentaire sur la feuille active. Il est important de noter que cette approche ne modifie pas réellement la couleur native de l’indicateur, mais la masque visuellement sous un triangle de votre couleur choisie.

Cette méthode convient parfaitement aux utilisateurs souhaitant distinguer visuellement les indicateurs de commentaire sans avoir à formater manuellement chaque élément. Si vous partagez régulièrement des classeurs ou si vous souhaitez coder les commentaires par type ou par auteur, VBA vous offre la personnalisation visuelle idéale. Son principal atout ? Appliquer instantanément vos modifications à de nombreuses cellules. Son inconvénient : il exige l’autorisation d’exécuter des macros et ne fait pas partie des fonctionnalités natives d’Excel. Par ailleurs, si la protection de feuille est activée, vous devrez peut-être la désactiver avant d’exécuter le code VBA.

1.Ouvrez la feuille de calcul sur laquelle vous souhaitez personnaliser la couleur de vos indicateurs de commentaires.

2. Appuyez sur ALT + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications. Ce raccourci fonctionne dans n’importe quel classeur Excel et ouvre directement votre environnement d’édition VBA.

3. Dans la fenêtre VBA, cliquez sur Insertion > Module pour créer un nouveau module, puis copiez-collez le code VBA suivant dans la fenêtre du module. Ce code détectera les commentaires et dessinera une forme triangulaire colorée sur chaque indicateur.

Code VBA : Modifier la couleur de l’indicateur de commentaire Feuille de calcul active

Sub CoverCommentIndicator()
'Update 20141110
Dim pWs As Worksheet
Dim pComment As Comment
Dim pRng As Range
Dim pShape As Shape
Set pWs = Application.ActiveSheet
wShp = 6
hShp = 4
For Each pComment In pWs.Comments
  Set pRng = pComment.Parent
  Set pShape = pWs.Shapes.AddShape(msoShapeRightTriangle, pRng.Offset(0, 1).Left - wShp, pRng.Top, wShp, hShp)
  With pShape
    .Flip msoFlipVertical
    .Flip msoFlipHorizontal
    .Fill.ForeColor.SchemeColor = 12
    .Fill.Visible = msoTrue
    .Fill.Solid
    .Line.Visible = msoFalse
  End With
Next
End Sub

4. Une fois le code collé, appuyez sur F5 (ou cliquez sur le bouton « Exécuter » dans la fenêtre VBA) pour lancer l’exécution. Tous les indicateurs de commentaire de votre feuille active seront alors recouverts visuellement par des triangles de la couleur spécifiée, comme illustré ci-dessous :

une capture d’écran montrant les données d’origine
une capture d’écran d’une flèche
une capture d’écran montrant les commentaires avec la couleur de l’indicateur modifiée

Remarques et conseils :

1. Dans le code, la couleur du triangle est définie à l’aide de .Fill.ForeColor.SchemeColor = 12. Vous pouvez remplacer 12 par un autre code couleur selon vos préférences. Par exemple, le remplacer par 10 appliquera une teinte différente. Consultez la documentation officielle d’Excel sur l’index des couleurs (ColorIndex) pour découvrir les numéros disponibles dans la palette de couleurs.

2. Les formes triangulaires personnalisées sont ancrées au coin de la cellule, mais leur taille ou leur position peut être modifiée si vous redimensionnez ou déplacez les cellules sous-jacentes. Pour des résultats optimaux, définissez d’abord la taille finale de vos cellules avant d’exécuter le code, ou relancez-le si vous avez redimensionné votre feuille.

3. Pour supprimer instantanément tous les triangles colorés (sans toucher à vos commentaires réels), exécutez le code VBA ci-dessous, qui cible exclusivement les triangles ajoutés par le script précédent. Cette action est idéale si vous souhaitez rétablir les indicateurs rouges par défaut ou modifier à nouveau leur couleur.

Code VBA : Supprimer les formes triangulaires placées sur les indicateurs de commentaire

Sub RemoveIndicatorShapes()
'Update 20141110
Dim pWs As Worksheet
Dim pShape As Shape
Set pWs = Application.ActiveSheet
For Each pShape In pWs.Shapes
    If Not pShape.TopLeftCell.Comment Is Nothing Then
      If pShape.AutoShapeType = msoShapeRightTriangle Then
        pShape.Delete
      End If
    End If
Next
End Sub

Pour exécuter ce code de suppression, suivez les mêmes étapes que précédemment : ouvrez l’éditeur VBA, insérez un module, collez le code et lancez-le avec F5. Vos données de commentaire restent intactes ; seules les formes indicateurs sont supprimées.

Si vous rencontrez une erreur lors de l’exécution de l’un ou l’autre script, assurez-vous que les macros sont activées dans les paramètres d’Excel, que la feuille n’est pas protégée et que les objets qu’elle contient ne sont pas verrouillés. Pensez également à enregistrer votre travail avant d’exécuter du code VBA, afin de pouvoir annuler les modifications si nécessaire.

Si vous travaillez dans un environnement organisationnel où l’exécution de macros est restreinte ou si vous préférez ne pas utiliser VBA, envisagez de mettre en évidence les cellules commentées à l’aide de Utiliser la mise en forme conditionnelle comme alternative pour les identifier visuellement, même si cela ne modifiera pas la couleur du triangle lui-même. Une autre solution consiste à utiliser manuellement des formes ou des icônes pour marquer les cellules commentées.


Articles associés :

Comment mettre en évidence tous les commentaires dans Excel ?

Comment afficher ou masquer tous les commentaires ainsi que leurs indicateurs dans Excel ?


Meilleurs outils de productivité Office

🤖Kutools IA Aide: Révolutionnez Analyse des données grâce à :Exécution intelligente   |  Générez du code|  Créez formules personnalisées  |  Analysez des données et générez des graphiques|  Appelez Fonctions améliorées
Fonctionnalités populaires:Rechercher, mettre en surbrillance ou Marquer les doublons   |  Supprimer les lignes vides   |  Combinez les colonnes ou cellules sans perdre de données   |   Arrondi sans utiliser de formule...
Super RECHERCHEV:RechercheValeurs avec critères multiples  |  RechercheValeurs avec valeurs multiples  |   RechercheValeurs dans plusieurs feuilles   |   Correspondance 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 précis de colonnes|Déplacer des colonnes|Basculer la visibilité des colonnes masquées|Comparer des plages et des colonnes...
Fonctionnalités vedettes:Mise au point de la grille   |  Vue de conception   |Barre de formule améliorée   | Gestionnaire de classeurs et de feuilles   |  Bibliothèque de ressources(Texte automatique)|  Sélecteur de date   |  Consolider les feuilles de calcul  |  Chiffrer/Déchiffrer les cellules   | Envoyer des e-mails par liste   |  Super Filtre   |   Filtre spécial(Filtrer les cellules avec une police en gras/italique/barré...) ...
… et bien plus encore… et plus encore:(,)Supprimer des caractères spécifiques, ...)|   50+Typesde graphiques(, ...)|   40+ Formules pratiques(Calculer l'âge en fonction de la date de naissance, ...)|   19 Outils d’insertion(,Insérer une image depuis un chemin , ...)|   de conversion (Convertir en mots,Conversion de devises, ...)|Fusionner et scinder   (Fusion avancée des lignes,Diviser les cellules , ...)|, ...)   |
Utilisez Kutools dans la langue de votre choix – disponible en anglais, espagnol, allemand, français, chinois et 40+ autres langues !

Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...


Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile

  • Activez 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 vous fait économiser des centaines de clics de souris chaque jour !

Tous les compléments Kutools. Un seul installateur

Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.

ExcelWordOutlookTabsPowerPoint
  • Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
  • Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
  • Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
  • Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
  • Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels