Comment colorier les lignes alternées pour les cellules fusionnées dans Excel ?
Il est très utile de formater des lignes alternées avec une couleur différente dans un grand ensemble de données pour nous permettre de parcourir les données facilement. Cependant, parfois, il peut y avoir des cellules fusionnées dans vos données. Pour mettre en surbrillance les lignes alternées avec une couleur différente pour les cellules fusionnées comme le montre la capture d'écran ci-dessous, comment pourriez-vous résoudre ce problème dans Excel ?
Colorer les lignes alternées pour les cellules fusionnées avec la mise en forme conditionnelle
Colorer les lignes alternées pour les cellules fusionnées avec du code VBA
Colorer les lignes alternées pour les cellules fusionnées avec la mise en forme conditionnelle
Dans Excel, la fonctionnalité puissante de Mise en forme conditionnelle peut vous aider à accomplir cette tâche aussi rapidement que possible. Veuillez suivre les étapes ci-dessous :
1. Sélectionnez la plage de données qui contient les cellules fusionnées que vous souhaitez colorier alternativement, puis cliquez sur Accueil > Mise en forme conditionnelle > Nouvelle règle, voir la capture d'écran :
2. Dans la fenêtre Nouvelle règle de mise en forme qui s'affiche, effectuez les opérations suivantes :
- Sélectionnez Utiliser une formule pour déterminer les cellules à formater depuis la liste déroulante Sélectionner un type de règle ;
- Puis entrez cette formule : =MOD(NBVAL($A$2:$A2),2)=0 dans la zone de texte Formater les valeurs où cette formule est vraie.
- Remarque : A2 est la première cellule de votre plage de données.
3. Ensuite, cliquez sur le bouton Format pour accéder à la boîte de dialogue Format de cellule. Sous l'onglet Remplissage, choisissez une couleur que vous souhaitez utiliser pour mettre en surbrillance les lignes, voir la capture d'écran :
4. Cliquez sur OK > OK pour fermer les dialogues, et les lignes avec les cellules fusionnées sont remplies de la couleur que vous avez spécifiée, voir la capture d'écran :
5. Continuez en cliquant sur Accueil > Mise en forme conditionnelle > Nouvelle règle pour ouvrir la boîte de dialogue Nouvelle règle de mise en forme, effectuez les opérations suivantes :
- Sélectionnez Utiliser une formule pour déterminer les cellules à formater depuis la liste déroulante Sélectionner un type de règle ;
- Puis entrez cette formule : =MOD(NBVAL($A$2:$A2),2)=1 dans la zone de texte Formater les valeurs où cette formule est vraie.
- Ensuite, cliquez sur le bouton Format pour choisir une autre couleur que vous souhaitez utiliser pour mettre en surbrillance les lignes.
- Remarque : A2 est la première cellule de votre plage de données.
6. Puis, cliquez sur OK > OK pour fermer les dialogues, et maintenant, vous pouvez voir que la plage de données sélectionnée a été ombrée avec deux couleurs différentes alternativement en fonction des cellules fusionnées comme le montre la capture d'écran ci-dessous :
Colorer les lignes alternées pour les cellules fusionnées avec du code VBA
Outre la mise en forme conditionnelle classique, vous pouvez également utiliser un code VBA pour appliquer facilement des couleurs de ligne alternatives aux cellules fusionnées.
1. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Ensuite, cliquez sur Insertion > Module, et collez le code suivant dans la fenêtre Module.
Code VBA : Colorer les lignes alternées pour les cellules fusionnées
Sub Kutools_AlternateColor()
'Update by ExtendOffice
Dim xRg As Range
Dim xCRg As Range
Dim xIRg As Range
Dim xC1, xC2 As Integer
Dim xR1 As Integer
Dim xCnt As Long
Dim xLColor, xDCR1, xDCR2 As Long
Set xRg = Application.InputBox("Please select the data range:", "KutoolsforExcel", "", Type:=8)
If TypeName(xRg) = "Nothing" Then Exit Sub
Set xCRg = Application.InputBox("Please select the column with the merged cells:", "KutoolsforExcel", "", Type:=8)
If TypeName(xCRg) = "Nothing" Then Exit Sub
Set xIRg = Intersect(xRg, xCRg)
If xIRg Is Nothing Then
MsgBox "the data range doesn't contain merged cells"
Exit Sub
End If
xC1 = xRg.Column
xC2 = xIRg.Column
xR1 = xRg.Row
xLColor = RGB(221, 235, 247)
xDCR1 = RGB(221, 235, 247)
xDCR2 = RGB(250, 232, 222)
xRw = 0
Do
xLColor = xDCR1 + xDCR2 - xLColor
xCnt = Cells(xRw + xR1, xC2).MergeArea.Rows.Count
Cells(xRw + xR1, xC1).Resize(xCnt, xRg.Columns.Count).Interior.Color = xLColor
xRw = xRw + xCnt
Loop While xRw < xRg.Rows.Count - 1
End Sub
3. Ensuite, appuyez sur la touche F5 pour exécuter ce code. Dans la première boîte de dialogue qui apparaît, sélectionnez la plage de données que vous souhaitez utiliser, voir la capture d'écran :
4. Dans la deuxième boîte de dialogue, sélectionnez la colonne avec les cellules fusionnées, voir la capture d'écran :
5. Puis, cliquez sur le bouton OK, les lignes sont ombrées alternativement en fonction des cellules fusionnées comme le montre la capture d'écran ci-dessous :
Vidéo : Colorer les lignes alternées pour les cellules fusionnées
Plus d'articles connexes :
- Filtrer toutes les données associées des cellules fusionnées
- Supposons qu'il y ait une colonne de cellules fusionnées dans votre plage de données, et maintenant, vous devez filtrer cette colonne avec des cellules fusionnées pour afficher toutes les lignes qui sont liées à chaque cellule fusionnée comme le montrent les captures d'écran suivantes. Dans Excel, la fonction Filtrer vous permet de filtrer uniquement le premier élément associé aux cellules fusionnées. Dans cet article, je vais expliquer comment filtrer toutes les données associées des cellules fusionnées dans Excel.
- Copier et coller des cellules fusionnées vers des cellules simples
- Normalement, lorsque vous copiez des cellules fusionnées et les collez dans d'autres cellules, les cellules fusionnées seront collées directement. Mais, vous voulez coller ces cellules fusionnées dans des cellules simples comme le montre la capture d'écran suivante, afin de pouvoir manipuler les données selon vos besoins. Dans cet article, je vais expliquer comment copier et coller des cellules fusionnées vers des cellules simples.
- Effacer le contenu de plusieurs cellules fusionnées
- Si vous avez une grande feuille de calcul qui contient plusieurs cellules fusionnées, et maintenant, vous voulez effacer tout le contenu des cellules fusionnées tout en conservant les cellules fusionnées. Normalement, vous pourriez essayer d'utiliser la fonction Rechercher et remplacer pour sélectionner toutes les cellules fusionnées d'abord, puis appuyer sur la touche Supprimer pour supprimer la valeur, cependant, vous obtiendrez un message d'avertissement "Nous ne pouvons pas faire cela sur une cellule fusionnée". Dans ce cas, comment effacer les valeurs des cellules fusionnées tout en laissant les cellules fusionnées rapidement dans Excel ?
- Numéroter automatiquement des cellules fusionnées
- Comment pourrions-nous remplir des numéros de série dans une liste de cellules fusionnées de différentes tailles dans Excel ? La première idée qui nous vient à l'esprit est de faire glisser la poignée de recopie automatique pour remplir les cellules fusionnées, mais, dans ce cas, nous obtiendrons le message d'avertissement suivant, et ne pourrons pas remplir les cellules fusionnées.
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 !
