Passer au contenu principal

Excel : si la couleur de la police est rouge, renvoyez un texte spécifique ou effectuez d'autres opérations

Comment pourriez-vous renvoyer un texte spécifique si la couleur de la police est rouge dans une autre cellule, comme illustré ci-dessous ? Dans cet article, je présenterai quelques astuces pour effectuer certaines opérations basées sur le texte de police rouge dans Excel.


Si la couleur de la police est rouge, renvoyez un texte spécifique dans une autre cellule

Pour renvoyer un texte spécifique si la couleur de la police est rouge dans une autre cellule, procédez comme suit :

1. presse Alt + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Puis clique insérer > Module, copiez et collez le code VBA ci-dessous dans la fenêtre.

Code VBA : si la couleur de la police est rouge, renvoie 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
Notes: Dans le code ci-dessus, si la couleur de la police est rouge, alors renvoyez le texte "Échoué», s'il n'est pas rouge, renvoie le texte «Passé”. Vous pouvez modifier les deux textes, selon vos besoins.

3. Ensuite, fermez la fenêtre de code et entrez cette formule : =CouleurPoliceISRouge(B2), puis faites glisser la poignée de recopie vers le bas pour obtenir les autres résultats, voir capture d'écran :


Si la couleur de la police est rouge, mettez la cellule en surbrillance

Si vous souhaitez mettre en surbrillance les cellules en fonction de la police rouge, procédez comme suit :

1. presse Alt + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Puis clique insérer > Module, copiez et collez le code VBA ci-dessous dans la fenêtre.

Code VBA : si la couleur de la police est rouge, mettez la cellule en surbrillance

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 puis, fermez la fenêtre de code, allez cliquer Accueil > Mise en forme conditionnelle > Nouvelle règle, voir capture d'écran:

4. Dans le sauté Nouvelle règle de formatage boîte de dialogue, effectuez les opérations suivantes:

  • Cliquez Utilisez une formule pour déterminer les cellules à formater dans l' Sélectionnez un type de règle zone de liste;
  • Entrez cette formule =police en surbrillance rouge (B2) into the Formater les valeurs où cette formule est vraie zone de texte;
  • Puis clique Format .

5. Dans le Format de cellule boîte de dialogue, sous la Niveau de remplissage onglet, choisissez une couleur que vous souhaitez mettre en surbrillance la cellule, voir capture d'écran :

6. Et puis, cliquez OK > OK pour fermer les boîtes de dialogue. Et maintenant, les cellules avec une police rouge sont surlignées à la fois, voir capture d'écran :


Si la couleur de la police est rouge, changez la couleur de la police

Parfois, vous voudrez peut-être changer la police rouge en une autre couleur de police, ici je parlerai de deux méthodes pour y parvenir.

 Si la couleur de la police est rouge, changez la couleur de la 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 rendre service, veuillez suivre les étapes suivantes :

1. Sélectionnez la plage de données dont vous souhaitez modifier la couleur de police, puis appuyez sur Ctrl + H clés pour ouvrir le Rechercher et remplacer boite de dialogue. Dans la boîte de dialogue ouverte, cliquez sur Choix>> bouton, voir capture d'écran:

2. Dans la boîte de dialogue développée, effectuez les opérations suivantes :

  • Quitter le Trouvez ce que et Remplacez-le par cases vides ;
  • Sur le côté droit de la Trouvez ce que champ, sélectionnez Format > Choisissez le format de la cellule, et cliquez sur une cellule avec une police rouge ;
  • Ensuite, sur le côté droit de la Remplacez-le par champ, sélectionnez Format > Format pour aller à la Remplacer le format dialogue.

3. Dans le Remplacer le format dialogue, sous le Fonte onglet, choisissez une couleur que vous souhaitez modifier dans l'onglet Couleur liste déroulante, voir captures d'écran :

4. Puis clique OK pour fermer le Remplacer le format boîte de dialogue, et maintenant, cliquez sur Remplacer tout bouton dans le Rechercher et remplacer boîte de dialogue, toutes les cellules avec une police rouge sont remplacées par la couleur de police que vous avez spécifiée, voir capture d'écran :

Notes: Lorsque vous choisissez le format d'une cellule existante, tous les formats des cellules seront sélectionnés. Dans ce cas, lors de l'exécution du Remplacer, si un format ne correspond pas exactement, la cellule ne sera pas remplacée.

 Si la couleur de la police est rouge, changez la couleur de la police avec une fonctionnalité utile

Si vous avez Kutools for Excel, Avec son Sélectionnez les cellules avec un format fonctionnalité, vous pouvez sélectionner les cellules avec une police rouge, puis modifier la couleur de la police selon vos besoins le plus rapidement possible.

Après l'installation de Kutools for Excel, veuillez faire comme ceci:

1. Sélectionnez la plage de données que vous souhaitez utiliser, puis cliquez sur Kutools > Sélectionnez > Sélectionnez les cellules avec un format, voir capture d'écran:

2. Dans le Sélectionnez les cellules avec un format boîte de dialogue, cliquez sur Choisissez le format de la cellule bouton. Et puis, sélectionnez une cellule avec une police rouge, tous les attributs de cette cellule sont affichés dans la zone de liste ci-dessous. Si vous souhaitez sélectionner toutes les cellules avec exactement le même formatage que la cellule de base, veuillez cocher toutes les options d'attribut ; Si vous souhaitez simplement sélectionner les cellules avec uniquement une police rouge, décochez tous les autres attributs sauf le Couleur police case à cocher. Voir la capture d'écran:

3. Puis clique OK bouton, et dans la boîte de dialogue suivante, cliquez sur Oui, voir capture d'écran:

4. Toutes les cellules avec une police rouge sont sélectionnées en même temps, puis vous pouvez spécifier une couleur de police pour modifier la police rouge selon vos besoins. Voir capture d'écran :


  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtrée
  • Fusionner les cellules / lignes / colonnes et conservation des données; Contenu des cellules divisées; Combiner les lignes en double et la somme / moyenne... Empêcher les cellules en double; Comparer les gammes
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Formules favorites et insérer rapidement, Plages, graphiques et images; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellules
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF
  • Regroupement du tableau croisé dynamique par numéro de semaine, jour de la semaine et plus encore ... Afficher les cellules déverrouillées et verrouillées par différentes couleurs; Mettre en évidence les cellules qui ont une formule / un nom
onglet kte 201905
  • 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!
bas de cabine
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations