Come evidenziare una cella o una riga con una casella di controllo in Excel?

Come mostrato nello screenshot sottostante, è necessario evidenziare una riga o una cella con una casella di controllo. Quando la casella di controllo viene selezionata, una riga specificata o una cella verrà evidenziata automaticamente. Ma come fare ciò in Excel? Questo articolo vi mostrerà due metodi per raggiungere questo obiettivo.

Evidenzia cella o riga con casella di controllo tramite Formattazione Condizionale
Evidenzia cella o riga con casella di controllo tramite codice VBA

Evidenzia cella o riga con casella di controllo tramite Formattazione Condizionale

È possibile creare una regola di Formattazione Condizionale per evidenziare una cella o una riga con una casella di controllo in Excel. Si prega di procedere come segue.

PASSO UNO: Collega tutte le caselle di controllo a una cella specificata

1. È necessario inserire manualmente le caselle di controllo nelle celle una per una facendo clic su Sviluppatore > Inserisci > Casella di Controllo (Controllo Modulo).

2. Ora le caselle di controllo sono state inserite nelle celle della colonna I. Selezionare la prima casella di controllo in I1, inserire la formula =$J1 nella barra delle formule e quindi premere il tasto Invio.

Suggerimento: se non si desidera associare valori alle celle adiacenti alle caselle di controllo, è possibile collegare la casella di controllo a una cella di un altro foglio di lavoro, come =Foglio3!$E1.

3. Ripetere il passaggio 1 fino a quando tutte le caselle di controllo saranno collegate alle celle adiacenti o alle celle in un altro foglio di lavoro.
Nota: Tutte le celle collegate devono essere consecutive e situate nella stessa colonna.

PASSO DUE: Creare una regola di Formattazione Condizionale

Ora è necessario creare una regola di Formattazione Condizionale seguendo i passaggi uno per uno.

1. Selezionare le righe che si desidera evidenziare con le caselle di controllo, quindi fare clic su Formattazione Condizionale > Nuova Regola sotto la scheda Home. Vedere lo screenshot:

2. Nella finestra di dialogo Nuova Regola di Formattazione, è necessario:

Ora la regola di Formattazione Condizionale è stata creata. Quando si selezionano le caselle di controllo, le righe corrispondenti verranno evidenziate automaticamente come mostrato nello screenshot qui sotto.

Evidenzia cella o riga con casella di controllo tramite codice VBA

Il seguente codice VBA può anche aiutarvi a evidenziare una cella o una riga con una casella di controllo in Excel. Si prega di procedere come segue.

1. Nel foglio di lavoro in cui è necessario evidenziare una cella o una riga con una casella di controllo. Fare clic con il tasto destro sulla Scheda Foglio e selezionare Visualizza Codice dal menu contestuale per aprire la finestra Microsoft Visual Basic for Applications.

2. Quindi copiare e incollare il seguente codice VBA nella finestra del Codice.

Codice VBA: Evidenzia riga con casella di controllo in 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. Premere il tasto F5 per eseguire il codice. (Nota: è necessario posizionare il cursore nella prima parte del codice per applicare il tasto F5) Nella finestra di dialogo Kutools for Excel che appare, selezionare l'intervallo in cui si desidera inserire le caselle di controllo e quindi fare clic sul pulsante OK. Qui seleziono l'intervallo I1:I6. Vedere lo screenshot:

4. Quindi le caselle di controllo vengono inserite nelle celle selezionate. Selezionando una qualsiasi delle caselle di controllo, la riga corrispondente verrà evidenziata automaticamente come mostrato nello screenshot qui sotto.

Articoli correlati:

• Come modificare il valore o il colore di una cella specificata quando la casella di controllo è selezionata in Excel?
• Come inserire un timbro di data in una cella se si spunta una casella di controllo in Excel?
• Come rendere selezionata la casella di controllo in base al valore della cella in Excel?
• Come filtrare i dati in base alla casella di controllo in Excel?
• Come nascondere la casella di controllo quando la riga è nascosta in Excel?
• Come creare un elenco a discesa con più caselle di controllo in Excel?