Come si può ottenere il numero di celle o sommare tutte le celle che contengono un particolare colore di carattere in Excel? Ad esempio, ho un intervallo di dati in un foglio di lavoro come mostrato nella figura seguente, e ora voglio rispettivamente contare o sommare le celle che hanno un colore di carattere rosso, blu e nero. In Excel, non esiste una formula diretta da gestire questo compito, qui, parlerò di alcuni trucchi per risolvere questo lavoro.

Conta o somma le celle in base ai colori dei caratteri con Funzione definita dall'utente

Conta o somma le celle in base al colore del carattere con Kutools per Excel

Conta o somma le celle in base al colore di sfondo con Kutools per Excel

Contare le celle in base ai colori dei caratteri:

Per calcolare il numero di celle con colori di caratteri specifici, fai come segue:

1. Tenere premuto il tasto ALT + F11 chiavi, e apre il Finestra di Microsoft Visual Basic per applicazioni.

2. Clic inserire > Moduloe incollare il seguente codice nel Finestra del modulo.

Codice VBA: contare le celle in base ai colori dei caratteri:

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double
'Update 20140210
Application.Volatile
Dim rng As Range
For Each rng In pRange1
    If rng.Font.Color = pRange2.Font.Color Then
        CountColour = CountColour + 1
    End If
Next
End Function

3. Quindi salvare questo codice e tornare al foglio di lavoro e quindi immettere questa formula in una cella vuota = CountColour (A1: D8, A1) , vedi screenshot:

Note: Nella formula sopra, A1: D8 è l'intervallo che si desidera utilizzare e A1 è la cella con un colore di carattere particolare che vuoi contare.

4. Dopo aver digitato la formula, premere entrare chiave, e otterrai il numero di celle con i colori dei caratteri rossi. Se vuoi contare altre celle colorate, per favore inserisci più volte la formula possibile. Otterrete i seguenti risultati:

Somma le celle in base ai colori dei caratteri:

Per sommare le celle in base ai colori dei caratteri, la seguente funzione definita dall'utente può essere di aiuto.

1. Tenere premuto il tasto ALT + F11 chiavi, e apre il Finestra di Microsoft Visual Basic per applicazioni.

2. Clic inserire > Moduloe incollare il seguente codice nel Finestra del modulo.

Codice VBA: somma le celle in base ai colori dei caratteri:

Public Function SumByColor(pRange1 As Range, pRange2 As Range) As Double
'Update 20140210
Application.Volatile
Dim rng As Range
Dim xTotal As Double
xTotal = 0
For Each rng In pRange1
    If rng.Font.Color = pRange2.Font.Color Then
        xTotal = xTotal + rng.Value
    End If
Next
SumByColor = xTotal
End Function

3. Quindi salvare questo codice e tornare al foglio di lavoro originale, quindi inserire questa formula = SumByColor (A1: D8, A1) in una cella vuota, vedi screenshot:

Note: Nella formula sopra, A1: D8 è l'intervallo che si desidera utilizzare e A1 è la cella con un colore di carattere particolare che desideri sommare.

4. Quindi premere entrare chiave e si sommano tutte le celle con i colori dei caratteri rossi. Se si desidera sommare altre celle colorate, per favore inserire più volte la formula. Otterrai il seguente risultato: