Come si fa a colorare le righe alternate in Excel?

È molto utile formattare le righe alternate con un colore diverso in un ampio set di dati per facilitarne la lettura, ma a volte potrebbero esserci alcune celle unite nei dati. Come si può evidenziare alternativamente le righe con un colore diverso, tenendo conto delle celle unite, come mostrato nello screenshot seguente, in Excel?

Colora le righe alternate per Unito con Utilizza la formattazione condizionale

Colora le righe alternate per Unito con codice VBA

---

Colora le righe alternate per Unito con Utilizza la formattazione condizionale

In Excel, la potente funzionalità Utilizza la formattazione condizionale ti permette di svolgere rapidamente questa attività. Procedi come segue:

1. Seleziona l’intervallo di dati contenente le righe da colorare alternativamente, quindi fai clic su Home > Formattazione condizionale > Nuova regola. Vedi lo screenshot:

2. Nella finestra di dialogo Nuova regola di formattazione visualizzata, esegui le seguenti operazioni:

• Selezionare Usa una formula per determinare le celle da formattaredall’elenco Seleziona un tipo di regola;
• Inserisci quindi questa formula:=MOD(COUNTA($A$2:$A2),2)=0 nella casella di testo Formatta i valori per cui questa formula è vera.
• Nota: A2 è la prima cella del vostro intervallo dati.

3. Fare quindi clic sul pulsante Formato per aprire la finestra di dialogo Imposta formato cella. Nella scheda Riempimento, scegliere un colore con cui evidenziare le righe. Vedere lo screenshot:

4. Fare clic su OK > OK per chiudere le finestre di dialogo. Le righe contenenti le unità verranno riempite con il colore specificato; vedere lo screenshot:

5. Fare nuovamente clic su Home > Utilizza la formattazione condizionale > Nuova regola per aprire la finestra di dialogo Nuova regola di formattazione ed eseguire le seguenti operazioni:

• Selezionare Usa una formula per determinare le celle da formattaredall’elenco Seleziona un tipo di regola;
• Quindi inserire questa formula:=MOD(COUNTA($A$2:$A2),2)=1nella casella di testo Formatta i valori per cui questa formula è vera.
• Fai quindi clic sul pulsante Formato per scegliere un altro colore con cui evidenziare le righe.
• Nota: A2 è la prima cella del vostro intervallo dati.

6. Fare quindi clic su OK>OK per chiudere le finestre di dialogo. A questo punto, si noterà che l’intervallo Seleziona Dati è stato colorato con due colori diversi alternati in base alle Unito, come mostrato nello screenshot seguente:

---

Colora le righe alternate per Unito con codice VBA

Oltre al metodo standard Utilizza la formattazione condizionale, è possibile utilizzare anche un codice VBA per applicare facilmente colori alternati alle righe per Unito.

1. Tenere premuti i tasti ALT + F11 per aprire la finestra di Microsoft Visual Basic, Applications.

2. Fare quindi clic su Inserisci > Modulo e incollare il codice seguente nella finestra del Modulo.

Codice VBA: Colora le righe alternate per Unito

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. Premere quindi il tasto F5 per eseguire il codice. Nella prima finestra visualizzata, selezionare l’intervallo dati da utilizzare; vedere lo screenshot:

4. Nella seconda finestra di dialogo, seleziona la colonna con Unito; vedi lo screenshot:

5. Fare quindi clic sul pulsante OK: le righe verranno colorate alternativamente in base alle unità, come mostrato nello screenshot seguente:

---

Video: Colora le righe alternate per Unito

---

Altri articoli correlati: