Comment mettre en évidence une cellule ou une ligne avec une case à cocher dans Excel?

Comme illustré ci-dessous, vous devez mettre en évidence la ligne ou la cellule avec la case à cocher. Lorsqu'une case à cocher est cochée, une ligne ou une cellule spécifiée sera mise en surbrillance automatiquement. Mais comment y parvenir dans Excel? Cet article vous montrera deux méthodes pour y parvenir.

Mettez en surbrillance la cellule ou la ligne avec une case à cocher avec mise en forme conditionnelle
Mettez en surbrillance la cellule ou la ligne avec la case à cocher avec le code VBA

Mettez en surbrillance la cellule ou la ligne avec une case à cocher avec mise en forme conditionnelle

Vous pouvez créer une règle de mise en forme conditionnelle pour mettre en évidence une cellule ou une ligne avec une case à cocher dans Excel. Veuillez faire comme suit.

Lier tout la case à cocher à une cellule spécifiée

1. Vous devez insérer manuellement des cases à cocher dans les cellules une par une en cliquant sur Développeur > insérer > Case à cocher (Contrôle de formulaire).

2. Des cases à cocher ont maintenant été insérées dans les cellules de la colonne I. Veuillez sélectionner la première case à cocher dans I1, entrez la formule = $ J1 dans la barre de formule, puis appuyez sur la touche Entrer clé.

Conseil : Si vous ne souhaitez pas que des valeurs soient associées dans les cellules adjacentes aux cases à cocher, vous pouvez lier la case à cocher à la cellule d'une autre feuille de calcul telle que = Feuille3! $ E1.

2. Répétez l'étape 1 jusqu'à ce que toutes les cases à cocher soient liées aux cellules adjacentes ou aux cellules d'une autre feuille de calcul.
Notes: Toutes les cellules liées doivent être consécutives et se situer dans la même colonne.

Créer une règle de mise en forme conditionnelle

Vous devez maintenant créer une règle de mise en forme conditionnelle comme suit étape par étape.

1. Sélectionnez les lignes à mettre en évidence avec des cases à cocher, puis cliquez sur Mise en forme conditionnelle > Nouvelle règle sous le Accueil languette. Voir la capture d'écran:

2. dans le Nouvelle règle de formatage boîte de dialogue, vous devez:

2.1 Sélectionnez le Utilisez une formule pour déterminer les cellules à formater option dans la Sélectionnez un type de règle boîte;

2.2 Entrez la formule = SI ($ J1 = VRAI, VRAI, FAUX) into the Formater les valeurs où cette formule est vraie boîte;
      Or = SI (Feuille3! $ E1 = VRAI, VRAI, FAUX) si les cases à cocher sont liées à une autre feuille de calcul.

2.3 Cliquez sur le Format bouton pour spécifier une couleur en surbrillance pour les lignes;

2.4 Cliquez sur le OK bouton. Voir la capture d'écran:

Notes: Dans la formule, $ J1 or $ E1 est la première cellule liée pour les cases à cocher, et assurez-vous que la référence de cellule a été modifiée en colonne absolue (J1> $ J1 or E1> $ E1).

La règle de mise en forme conditionnelle est maintenant créée. Lorsque vous cochez les cases, les lignes correspondantes seront automatiquement mises en surbrillance comme la capture d'écran du soufflet.

Mettez en surbrillance la cellule ou la ligne avec la case à cocher avec le code VBA

Le code VBA suivant peut également vous aider à mettre en évidence une cellule ou une ligne avec une case à cocher dans Excel. Veuillez faire comme suit.

1. Dans la feuille de calcul, vous devez mettre en évidence la cellule ou la ligne avec une case à cocher. Faites un clic droit sur Onglet Feuille et sélectionnez Voir le code dans le menu contextuel pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. Ensuite, copiez et collez le code VBA ci-dessous dans la fenêtre Code.

Code VBA: mettre en évidence la ligne avec la case à cocher dans Excel

Sub AddCheckBox()
Dim xCell As Range
Dim xRng As Range
Dim I As Integer
Dim xChk As CheckBox
On Error Resume Next
InputC:
    Set xRng = Application.InputBox("Please select the column range to insert checkboxes:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
If xRng.Columns.Count > 1 Then
    MsgBox "The selected range should be a single column", vbInformation, "Kutools fro Excel"
    GoTo InputC
Else
    If xRng.Columns.Count = 1 Then
        For Each xCell In xRng        
            With ActiveSheet.CheckBoxes.Add(xCell.Left, _
               xCell.Top, xCell.Width = 15, xCell.Height = 12)
               .LinkedCell = xCell.Offset(, 1).Address(External:=False)
               .Interior.ColorIndex = xlNone
               .Caption = ""
               .Name = "Check Box " & xCell.Row
            End With    
            xRng.Rows(xCell.Row).Interior.ColorIndex = xlNone                  
        Next        
    End If    
    With xRng    
     .Rows.RowHeight = 16    
    End With   
    xRng.ColumnWidth = 5#    
    xRng.Cells(1, 1).Offset(0, 1).Select    
    For Each xChk In ActiveSheet.CheckBoxes   
      xChk.OnAction = ActiveSheet.Name + ".InsertBgColor"      
    Next
End If
End Sub

Sub InsertBgColor()
Dim xName As Integer
Dim xChk As CheckBox
For Each xChk In ActiveSheet.CheckBoxes 
  xName = Right(xChk.Name, Len(xChk.Name) - 10) 
  If (xName = Range(xChk.LinkedCell).Row) Then   
   If (Range(xChk.LinkedCell) = "True") Then   
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = 6    
   Else    
    Range("A" & xName, Range(xChk.LinkedCell).Offset(0, -2)).Interior.ColorIndex = xlNone  
   End If  
  End If
Next
End Sub

3. appuie sur le F5 clé pour exécuter le code. (Notes: vous devez placer le curseur dans la première partie du code pour appliquer la touche F5) Dans le pop-up Kutools for Excel boîte de dialogue, sélectionnez la plage dans laquelle vous souhaitez insérer des cases à cocher, puis cliquez sur le OK bouton. Ici, je sélectionne la plage I1: I6. Voir la capture d'écran:

4. Les cases à cocher sont ensuite insérées dans les cellules sélectionnées. Cochez l'une des cases à cocher, la ligne correspondante sera mise en surbrillance automatiquement comme illustré ci-dessous.

Articles connexes:

• Comment modifier une valeur ou une couleur de cellule spécifiée lorsque la case est cochée dans Excel?
• Comment insérer un horodateur dans une cellule si une case à cocher est cochée dans Excel?
• Comment faire cocher la case en fonction de la valeur de la cellule dans Excel?
• Comment filtrer les données en fonction de la case à cocher dans Excel?
• Comment masquer la case à cocher lorsque la ligne est masquée dans Excel?
• Comment créer une liste déroulante avec plusieurs cases à cocher dans Excel?