Excel : Si la couleur de police est rouge, retourner un texte spécifique ou effectuer d'autres opérations
Comment pourriez-vous retourner un texte spécifique si la couleur de police est rouge dans une autre cellule comme le montre la capture d'écran ci-dessous ? Dans cet article, je vais vous présenter quelques astuces pour effectuer des opérations basées sur le texte en rouge dans Excel.

Si la couleur de police est rouge, retourner un texte spécifique dans une autre cellule
Pour retourner un texte spécifique si la couleur de police est rouge dans une autre cellule, procédez comme suit :
1. Appuyez simultanément sur Alt+ F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Ensuite, cliquez sur Insérer > Module, copiez et collez le code VBA ci-dessous dans la fenêtre.
Code VBA : Si la couleur de police est rouge, retourner un texte spécifique
Function FontColorisRed(Rng As Range)
'Updateby ExtendOffice
Application.Volatile
If Rng.Font.ColorIndex = 3 Then
FontColorisRed = "Fail"
Else
FontColorisRed = "Pass"
End If
End Function
3. Puis, fermez la fenêtre du code, et entrez cette formule : =FontColorISRed(B2), puis faites glisser la poignée de recopie vers le bas pour obtenir les autres résultats, voir capture d'écran :

Découvrez la magie d'Excel avec Kutools AI
- Exécution intelligente : Effectuez des opérations sur les cellules, analysez les données et créez des graphiques, le tout piloté par des commandes simples.
- Formules personnalisées : Générez des formules adaptées pour rationaliser vos flux de travail.
- Codage VBA : Écrivez et implémentez du code VBA sans effort.
- Interprétation des formules : Comprenez facilement des formules complexes.
- Traduction de texte : Surmontez les barrières linguistiques dans vos feuilles de calcul.
Si la couleur de police est rouge, mettre en surbrillance la cellule
Si vous souhaitez mettre en surbrillance les cellules en fonction de la police rouge, procédez comme suit :
1. Appuyez simultanément sur Alt+ F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Ensuite, cliquez sur Insérer > Module, copiez et collez le code VBA ci-dessous dans la fenêtre.
Code VBA : Si la couleur de police est rouge, mettre en surbrillance la cellule
Function HighlightRedFont(pRg As Range) As Boolean
'Updateby ExtendOffice
Dim xRg As Range
Dim xBol As Boolean
xBol = False
For Each xRg In pRg
If xRg.Font.Color = vbRed Then
xBol = True
End If
Next
HighlightRedFont = xBol
End Function
3. Et ensuite, fermez la fenêtre du code, allez cliquer sur Accueil > Mise en forme conditionnelle > Nouvelle règle, voir capture d'écran :
4. Dans la boîte de dialogue Nouvelle règle de mise en forme qui s'affiche, effectuez les opérations suivantes :
- Cliquez sur Utiliser une formule pour déterminer les cellules à formater dans la liste Sélectionner un type de règle ;
- Entrez cette formule =highlightredfont(B2) dans la zone de texte Formater les valeurs où cette formule est vraie ;
- Ensuite, cliquez sur le bouton Format.
5. Dans la boîte de dialogue Format de cellule, sous l'onglet Remplissage, choisissez une couleur que vous souhaitez utiliser pour mettre en surbrillance la cellule, voir capture d'écran :
6. Puis, cliquez sur OK > OK pour fermer les boîtes de dialogue. Maintenant, les cellules avec une police rouge sont mises en surbrillance immédiatement, voir capture d'écran :
Si la couleur de police est rouge, changer la couleur de police
Parfois, vous souhaiterez peut-être changer la police rouge en une autre couleur de police. Ici, je vais parler de deux méthodes pour y parvenir.
Si la couleur de police est rouge, changer la couleur de police avec la fonction Rechercher et remplacer
Pour changer la couleur de police rouge en une autre, la fonction Rechercher et remplacer d'Excel peut vous aider, veuillez suivre les étapes suivantes :
1. Sélectionnez la plage de données dont vous souhaitez changer la couleur de police, puis appuyez sur Ctrl + H pour ouvrir la boîte de dialogue Rechercher et remplacer. Dans la boîte de dialogue ouverte, cliquez sur le bouton Options>>, voir capture d'écran :
2. Dans la boîte de dialogue élargie, effectuez les opérations suivantes :
- Laissez les champs Rechercher quoi et Remplacer par vides ;
- À droite du champ Rechercher quoi, sélectionnez Format > Choisir le format à partir de la cellule, et cliquez sur une cellule avec une police rouge ;
- Puis, à droite du champ Remplacer par, sélectionnez Format > Format pour accéder à la boîte de dialogue Remplacer le format.
3. Dans la boîte de dialogue Remplacer le format, sous l'onglet Police, choisissez une couleur que vous souhaitez changer dans la liste déroulante Couleur, voir captures d'écran :
4. Ensuite, cliquez sur OK pour fermer la boîte de dialogue Remplacer le format, et maintenant, cliquez sur le bouton Remplacer tout dans la boîte de dialogue Rechercher et remplacer, toutes les cellules avec une police rouge sont remplacées par la couleur de police spécifiée, voir capture d'écran :
Si la couleur de police est rouge, changer la couleur de police avec une fonctionnalité utile
Si vous avez Kutools pour Excel, avec sa fonctionnalité Sélectionner les cellules avec un format, vous pouvez sélectionner les cellules avec une police rouge, puis changer la couleur de police selon vos besoins aussi rapidement que possible.
Après avoir installé Kutools pour Excel, veuillez procéder comme suit :
1. Sélectionnez la plage de données que vous souhaitez utiliser, puis cliquez sur Kutools > Sélectionner > Sélectionner les cellules avec un format, voir capture d'écran :
2. Dans la boîte de dialogue Sélectionner les cellules avec un format, cliquez sur le bouton Choisir le format à partir de la cellule. Ensuite, sélectionnez une cellule avec une police rouge, tous les attributs de cette cellule sont affichés dans la liste ci-dessous. Si vous souhaitez sélectionner toutes les cellules ayant exactement le même format que la cellule de base, cochez toutes les options d'attribut ; Si vous voulez simplement sélectionner les cellules avec seulement une police rouge, décochez tous les autres attributs sauf la case à cocher Couleur de police. Voir capture d'écran :
3. Ensuite, cliquez sur le bouton OK, et dans la boîte de dialogue contextuelle suivante, cliquez sur Oui, voir capture d'écran :
4. Toutes les cellules avec une police rouge sont sélectionnées immédiatement, puis vous pouvez spécifier une couleur de police pour changer la police rouge selon vos besoins. Voir capture d'écran :
Les meilleurs outils de productivité pour Office
Kutools pour Excel résout la plupart de vos problèmes et augmente votre productivité de 80 %
- Barre de formule avancée (éditez facilement plusieurs lignes de texte et de formules); Mode Lecture (lisez et éditez facilement un grand nombre de cellules); Coller dans une plage filtrée...
- Fusionner des cellules/lignes/colonnes tout en conservant les données; Diviser le contenu des cellules; Consolider des lignes en double et faire la somme/moyenne... Empêcher les doublons dans les cellules; Comparer des plages...
- Sélectionner des lignes en double ou uniques; Sélectionner des lignes vides (toutes les cellules sont vides); Super Recherche et recherche floue dans de nombreux classeurs; Sélection aléatoire...
- Copie exacte de plusieurs cellules sans changer les références de formule; Créer automatiquement des références vers plusieurs feuilles; Insérer des puces, des cases à cocher et plus encore...
- Ajouter et insérer rapidement des formules, des plages, des graphiques et des 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 par position, supprimer des espaces; Créer et imprimer des statistiques de page; Convertir entre le contenu des cellules et les commentaires...
- Super Filtre (enregistrer et appliquer des schémas de filtre à d'autres feuilles); Tri avancé par mois/semaine/jour, fréquence et plus; Filtre spécial par gras, italique...
- Consolider des classeurs et feuilles de calcul; Fusionner des tables basées sur des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots de fichiers xls, xlsx et PDF...
- Regroupement dans les tableaux croisés dynamiques par numéro de semaine, jour de la semaine et plus... Afficher les cellules verrouillées/déverrouillées avec différentes couleurs; Mettre en évidence les cellules contenant des formules/noms...

- Activer l'édition et la lecture à onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrir et créer 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 !
