Remplacement des couleurs d’arrière-plan dans les cellules (Microsoft Excel)
Jozef cherche un moyen de changer les couleurs d’arrière-plan de cellules spécifiques dans la feuille de calcul qu’il a créée. Par exemple, il aimerait trouver toutes les cellules d’arrière-plan rouges et les changer en bleu, ou trouver tous les arrière-plans jaunes et les changer en bleu. Jozef se demande s’il existe un moyen simple de le faire.
Il est assez évident que vous pouvez modifier manuellement les couleurs d’arrière-plan de toutes les cellules, il n’est donc pas nécessaire d’entrer dans cette option pour effectuer les modifications. Ce dont vous avez besoin, c’est d’un moyen d’apporter des modifications à toutes les cellules à la fois. Si vous utilisez Excel 2002 ou 2003, vous pouvez suivre ces étapes:
-
Appuyez sur Ctrl + H pour afficher l’onglet Remplacer de la boîte de dialogue Rechercher et remplacer.
-
Développez la boîte de dialogue en cliquant sur le bouton Options. (Voir la figure 1.)
-
Cliquez sur le bouton Format sur le côté droit de la zone Rechercher. Excel affiche la boîte de dialogue Rechercher un format.
-
Assurez-vous que l’onglet Patterns est sélectionné. (Voir la figure 2.)
-
Utilisez les commandes de la boîte de dialogue pour spécifier la couleur d’arrière-plan à remplacer.
-
Cliquez sur OK.
-
Cliquez sur le bouton Format sur le côté droit de la zone Remplacer par.
Excel affiche la boîte de dialogue Remplacer le format.
-
Assurez-vous que l’onglet Patterns est sélectionné.
-
Utilisez les commandes de la boîte de dialogue pour spécifier la couleur d’arrière-plan que vous avez utilisée lors de la modification des cellules.
-
Cliquez sur OK.
-
Cliquez sur Remplacer tout.
Si vous utilisez une ancienne version d’Excel, ces étapes ne fonctionneront pas.
Au lieu de cela, vous devrez utiliser une macro pour effectuer les modifications. Voici un exemple de celui qui devrait fonctionner. (Vous pouvez également utiliser cette macro dans les versions ultérieures d’Excel.)
Sub ChangeColor() Dim rCell As Range If Selection.Cells.Count = 1 Then MsgBox "Select the range to be processed." Exit Sub End If For Each rCell In Selection If rCell.Interior.Color = RGB(255, 0, 0) Then 'red rCell.Interior.Color = RGB(0, 0, 255) 'blue End If Next rCell End Sub
_Note: _
Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites ExcelTips), j’ai préparé une page spéciale qui comprend des informations utiles.
lien: / excelribbon-ExcelTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur]
.
ExcelTips est votre source pour une formation Microsoft Excel rentable.
Cette astuce (9042) s’applique à Microsoft Excel 97, 2000, 2002 et 2003. Vous pouvez trouver une version de cette astuce pour l’interface ruban d’Excel (Excel 2007 et versions ultérieures) ici:
link: / excelribbon-Replacing_Background_Colors_in_Cells [Remplacement des couleurs d’arrière-plan dans les cellules]
.