Utilisez une formule ou une fonction définie pour remplir automatiquement du texte en fonction de la cellule Couleur de remplissage dans Excel

Supposons qu’une liste de cellules soit remplie en Couleur de fond rouge ou vert. Vous souhaitez désormais remplir ces cellules avec du texte en fonction de leur Couleur de remplissage. Par exemple, comme le montre la capture d’écran ci-dessous, remplissez les cellules rouges avec « Oui », les cellules vertes avec « Non », et toutes les autres avec « Ni l’un ni l’autre ».

Utilisez une formule pour remplir automatiquement du texte en fonction de la cellule Couleur de remplissage

Utilisez un outil pratique pour remplir automatiquement du texte en fonction de la cellule Couleur de remplissage

Utilisez une fonction définie pour remplir automatiquement du texte en fonction de la cellule Couleur de remplissage située dans une autre colonne

Fichier exemple

Pour utiliser une formule qui remplit automatiquement une cellule avec un texte spécifique en fonction de sa couleur de remplissage, vous devez d’abord définir un nom.

1. Sélectionnez une cellule, par exemple la cellule A1, puis cliquez sur Formules > Définir un nom dans le groupe Noms définis.

2. Dans la boîte de dialogue Nouveau nom, saisissez Mycolor dans le champ Nom, puis entrez cette formule

dans la zone de texte Fait référence à. Cliquez sur OK.

Formula!A1 indique la cellule A1 dans la feuille nommée Formula. 10 et 3 correspondent au code couleur ; vous pouvez les modifier selon vos besoins. Pour en savoir plus sur les codes couleur, consultez ce site : http://dmcritchie.mvps.org/excel/colors.htm

À présent, dans la cellule remplie d’une couleur, vous pouvez saisir cette formule

Appuyez sur la touche Entrée, puis le texte correspondant à la couleur de remplissage s’affichera.

Avec la méthode du nom défini, vous devez retaper la formule dans chaque cellule, ce qui est fastidieux. Grâce à Kutools pour Excel, une collection d’outils Excel, son utilitaire Sélectionner les cellules avec un format similaire permet de sélectionner rapidement toutes les cellules ayant la même couleur de fond, afin que vous puissiez y saisir du texte spécifique en bloc.

Après avoir installé gratuitementKutools pour Excel, procédez comme suit :

1. Dans deux cellules inutilisées, appliquez séparément une **couleur de fond**. Si vous souhaitez que les cellules bleues affichent « Go » et les cellules oranges « Stop », appliquez respectivement le bleu à la cellule A1 et l’orange à la cellule B1.

2. Sélectionnez ensuite les cellules dans lesquelles vous souhaitez saisir du texte en fonction de la couleur de remplissage, puis cliquez sur Kutools > Sélectionner > Sélectionner les cellules avec un format similaire.

3. Dans la boîte de dialogue Sélectionner les cellules avec un format similaire, cliquez sur le bouton Sélectionner le format à partir de la cellule, puis, dans la boîte de dialogue qui s’ouvre, choisissez A1 — la cellule remplie avec la couleur selon laquelle vous souhaitez rechercher les cellules.

Cliquez sur OK pour revenir à la boîte de dialogue principale, décochez toutes les cases sauf celle intitulée Remplissage, puis désactivez l’option Ignorer les cellules vides. Cliquez sur OK > Oui pour sélectionner toutes les cellules remplies en bleu.

4. Saisissez maintenant le texte souhaité dans la barre de formule, puis appuyez sur les touches Ctrl + Entrée pour remplir toutes les cellules sélectionnées avec ce même texte.

Si vous souhaitez remplir du texte en fonction de la couleur de remplissage d’une autre colonne, utilisez une fonction personnalisée.

1. Appuyez sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez sur Insertion > Module pour insérer un script vierge, puis copiez-collez le code suivant.

VBA : remplir une cellule en fonction de la Couleur de remplissage d’une autre cellule

Function GetRangeColor(xRg As Range)
'UpdatebyKutools20191125
    If (xRg.Count > 1) Then
       GetRangeColor = "Only work for single cell"
    End If
    Select Case xRg.Interior.Color
    Case RGB(255, 0, 0)
        GetRangeColor = "Play"
    Case RGB(0, 255, 0)
        GetRangeColor = "Stop"
    Case Else
      GetRangeColor = "Neither"
    End Select
End Function

Dans ce code, RGB(255, 0, 0) et RGB(0, 255, 0) correspondent aux codes couleur ; vous pouvez les adapter selon vos besoins. Pour en savoir plus sur les codes couleur, consultez ce site : http://dmcritchie.mvps.org/excel/colors.html

3. Enregistrez ce code, fermez cette fenêtre et retournez à votre feuille. Dans une cellule, saisissez la formule suivante :

Appuyez sur la touche Entrée, puis faites glisser la poignée de recopie vers les autres cellules pour étendre cette formule.

A1 est la cellule dont vous souhaitez remplir le texte en fonction de sa couleur de remplissage.

Cliquez pour télécharger le fichier exemple

---

Les meilleurs outils de productivité bureautique

Kutools pour Excel résout la majorité de vos problèmes et augmente votre productivité de 80 %

• Super Barre de formule (modifiez facilement plusieurs lignes de texte et de formules) ; Mode Lecture (lisez et modifiez aisément un grand nombre de cellules) ; Coller dans Plage de filtrage...
• Fusionner des cellules, lignes ou colonnes tout en conservant les données ; diviser le contenu des cellules ; combiner les lignes en double avec somme ou moyenne… empêcher les doublons dans les cellules ; comparer des plages…
• Sélectionner les doublons ou les éléments uniques dans les lignes ; Sélectionner les lignes vides (toutes les cellules sont vides) ; Super Recherche et recherche floue dans de nombreux classeurs ; sélection aléatoire…
• Copiez plusieurs cellules sans modifier les références de formule ; créez automatiquement des références vers plusieurs feuilles ; insérez des puces, des cases à cocher et bien plus encore…
• Favoris et insertion rapide de formules, plages, graphiques et images ; crypter les cellules avec mot de passe ; créer une liste de diffusion et envoyer des e-mails…
• Extraire du texte, ajouter du texte, supprimer les caractères à une position donnée, supprimer les espaces ; créer et imprimer les statistiques de la page de données ; convertir le contenu des cellules en commentaires et inversement...
• Super Filtre (enregistrez et appliquez des schémas de filtre à d’autres feuilles) ; Tri avancé par mois, semaine, jour, fréquence, etc. ; Filtre spécial par gras, italique…
• Combinez plusieurs classeurs et feuilles de calcul en un seul ; fusionnez des tableaux à partir d’une colonne clé ; répartissez vos données dans plusieurs feuilles ; convertissez en lot vos fichiers xls, xlsx et PDF…
• Regroupement dans un tableau croisé dynamique par numéro de semaine, jour de la semaine et bien plus encore…Afficher les cellules non verrouillées et verrouiller la sélection avec des couleurs distinctes ;Mettre en surbrillance les cellules contenant une formule ou un nom défini…

En savoir plus...Essai gratuit de 30 jours avec toutes les fonctionnalités…Acheter... 

---

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 évite des centaines de clics de souris chaque jour !

En savoir plus...Essai gratuit de 30 jours avec toutes les fonctionnalités...Acheter...