Hoppa till huvudinnehåll

Hur räknar eller summerar celler baserat på teckensnittsfärger i Excel?

Hur kan du få antalet celler eller summera alla celler som innehåller en viss teckensnittsfärg i Excel? Till exempel har jag en rad data i ett kalkylblad enligt följande skärmdump, och nu vill jag respektive räkna eller summera cellerna som har en röd, blå och svart teckensnittsfärg. Normalt finns det inget direkt sätt att hantera denna uppgift, här kommer jag att prata om några knep för att lösa detta jobb.

Räkna eller summera celler baserat på teckensnittsfärger med användardefinierad funktion

Räkna eller summera celler baserat på teckensnittsfärg med några användbara funktioner

Räkna eller summera celler baserat på teckensnittsfärg med en fantastisk funktion - Räkna efter färg


Räkna eller summera celler baserat på teckensnittsfärger med användardefinierad funktion

Räkna celler baserat på teckensnittsfärger:

Gör så här för att beräkna antalet celler med specifika teckensnittsfärger:

1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic for Applications-fönstret.

2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.

VBA-kod: Räkna celler baserat på teckensnittsfärger:

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double
'Update by Extendoffice
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. Spara sedan den här koden och gå tillbaka till kalkylbladet och ange sedan denna formel i en tom cell = CountColour (A1: D10, A2) , se skärmdump:

Anmärkningar: I ovanstående formel, A1: D10 är det intervall som du vill använda och A2 är cellen med en viss teckensnittsfärg som du vill räkna.

4. När du har skrivit in formeln trycker du på ange nyckel och du får antalet celler med röda teckensnittsfärger. Om du vill räkna andra typsnittsfärgade celler, ange formeln upprepade gånger så mycket som du behöver. Du får följande resultat:


Sumceller baserat på teckensnittsfärger:

För att summera celler baserat på teckensnittsfärger kan följande användardefinierade funktion hjälpa dig.

1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic for Applications-fönstret.

2. Klicka Insert > Modulernaoch klistra in följande kod i Modulfönster.

VBA-kod: Summa celler baserat på teckensnittsfärger:

Public Function SumByColor(pRange1 As Range, pRange2 As Range) As Double
'Update by Extendoffice
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. Spara sedan den här koden och återgå till det ursprungliga kalkylbladet och ange sedan denna formel = SumByColor (A1: D8, A1) i en tom cell, se skärmdump:

Anmärkningar: I ovanstående formel, A1: D10 är det intervall som du vill använda och A2 är cellen med en viss teckensnittsfärg som du vill summera.

4. Tryck sedan på ange och du kommer att lägga till alla celler med röda teckensnittsfärger. Om du vill summera andra teckensnittsfärgade celler, ange formeln upprepade gånger. Du får följande resultat:


Räkna eller summera celler baserat på teckensnittsfärg med några användbara funktioner

Kan vara den användardefinierade funktionen som är besvärlig för dig att spara och tillämpa, här rekommenderar jag dig ett praktiskt verktyg-Kutools för Excelmed sina avancerade funktioner kan du lösa den här uppgiften snabbt och enkelt.

Tips:Att tillämpa detta COUNTBYFONTCOLOR och SUMBYFONTCOLOR funktioner, först bör du ladda ner Kutools för Excel, och använd sedan funktionen snabbt och enkelt.

När du har installerat Kutools för Excel, gör så här:

Räkna celler baserat på teckensnittsfärger:

1. Klicka på en cell där du vill placera räkningsresultatet och klicka sedan på Kutools > Kutools-funktioner > Statistik och matematik > COUNTBYFONTCOLOR, se skärmdump:

2. I Funktionsargument dialogruta, ange dataintervall och färgindexcell som du vill räkna efter typsnittfärg, se skärmdump:

3. Och klicka sedan på OK för att få andra resultat, du behöver bara kopiera den här formeln och ändra cellreferenser till ditt behov. Se skärmdump:


Sumceller baserat på teckensnittsfärger:

1. Klicka på en cell där du vill placera räkningsresultatet och klicka sedan på Kutools > Kutools-funktioner > Statistik och matematik > SUMBYFONTCOLOR, se skärmdump:

2. I Funktionsargument dialogruta, ange dataintervall och färgindexcell som du vill summera efter teckensnittsfärg, se skärmdump:

3. Och klicka sedan på OK för att få andra resultat, du behöver bara kopiera den här formeln och ändra cellreferenser till ditt behov. Se skärmdump:

Klicka för att ladda ner Kutools för Excel och gratis testversion nu!


Räkna eller summera celler baserat på teckensnittsfärg med en fantastisk funktion - Räkna efter färg

Kutools för Excel ger också en enkel funktion- Räkna efter färg, med det här verktyget kan du snabbt få beräkningsresultatet som räkna, summa, genomsnittliga celler och så vidare efter bakgrundsfärg, teckensnittsfärg, villkorlig formatering efter behov.

Tips:Att tillämpa detta Räkna efter färg funktionen, först bör du ladda ner Kutools för Excel, och använd sedan funktionen snabbt och enkelt.

När du har installerat Kutools för Excel, gör så här:

1. Välj det dataområde som du vill räkna och summera baserat på olika färger.

2. Klicka Kutools Plus> Räkna efter färg, se skärmdump:

3. I Räkna efter färg dialogrutan, välj Standardformatering från Färgmetod rulla ner och välj Font under Räkna typ rullgardinsmenyn, och cellerna med samma teckensnittsfärger har räknats, lagts upp, medelvärdet och så vidare, se skärmdump:

4. Och klicka sedan på Generera rapport knappen kommer du att få statistiken i en ny arbetsbok. Se skärmdump:

Klicka för att ladda ner Kutools för Excel och gratis testversion nu!


Fler artiklar:

  • Räkna och summera celler baserat på bakgrundsfärg i Excel
  • Om du antar att du har ett antal celler med olika bakgrundsfärger, som rött, grönt, blått och så vidare, men nu måste du räkna hur många celler i det intervallet som har en viss bakgrundsfärg och summera de färgade cellerna med samma viss färg . I Excel finns det ingen direkt formel för att beräkna summan och antalet färgceller, här presenterar jag några sätt att lösa detta problem.
  • Summa / räkna fetstil i ett antal celler i Excel
  • När du har ett dataintervall som innehåller några djärva siffror i ett kalkylblad och nu vill du bara summera eller räkna de djärva cellerna kan du naturligtvis lägga till dem en efter en manuellt, men det blir tidskrävande. Hur kunde du summera eller räkna bara de djärva cellerna i Excel på ett enkelt och snabbt sätt?
  • Applicera färggradient över flera celler
  • I Excel kan vi enkelt fylla bakgrundsfärg till en cell eller flera celler, men ibland behöver vi färgen fyllas lutning som följande skärmdump visas, hur kan färggradienten i en cell eller över flera celler i Excel?
  • Sammankoppla cellkolumner och behåll textfärg i Excel
  • När vi sammanfogar eller kombinerar cellkolumner i en kolumn kommer cellformateringen att gå förlorad (som vi alla känner till). Den här artikeln kommer jag att presentera några knep för att kombinera cellkolumnerna i en och hålla textfärgen så lätt som möjligt i Excel.

Räkna eller summera celler baserat på teckensnitt / bakgrund / villkorlig formateringsfärg:

Kutools för Excel: med mer än 300 praktiska Excel-tillägg, gratis att prova utan begränsning på 30 dagar. Ladda ner och testa gratis nu!

Bästa kontorsproduktivitetsverktyg

🤖 Kutools AI Aide: Revolutionera dataanalys baserat på: Intelligent utförande   |  Generera kod  |  Skapa anpassade formler  |  Analysera data och generera diagram  |  Anropa Kutools funktioner.
Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50+ Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...

Beskrivning


Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
Comments (52)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi..


I used it to count and sum from matrix. The problem is that the I need to count/sum in multiple range of cells. Is it possible to update this code to do this?
This comment was minimized by the moderator on the site
Hello, Joseph,

Maybe there is no direct way for you to count or sum the cell values based on font color in multiple ranges, but, you can apply the third method in this article and use Count by Color feature of Kutools for Excel, with this feature, you just need to select the multiple ranges first, and then apply the feature.
https://www.extendoffice.com/documents/excel/1418-excel-count-sum-by-font-color.html#a3

Please try it, thank you!
This comment was minimized by the moderator on the site
COUNT CELLS BY FONT COLOR tutorial was great! But it is not working when the font color was based on the conditional formatting. Do you have something for this concern?
This comment was minimized by the moderator on the site
Hello,
The codes in this article can not support the conditional formatting, but, you can use our Kutools for Excel's Count by Color feature, it can help you to count or sum conditional font colors. Please try it.
This comment was minimized by the moderator on the site
This was exactly what I needed - Thanks!
This comment was minimized by the moderator on the site
= SumByColor (A1: D8, A1) NÃO FUNCIONOU


=SumByColor(A1:D8;A1) FUNCIONOU

TIRANDO ESPAÇO E USANDO " ; " AO INVÉS DE " , " AI FUNCIONOU LEGAL.

USO EXCEL 10


MUITO BOM.


OBRIGADO
This comment was minimized by the moderator on the site
Is there a way to change Count Or Sum Cells Based On Font Colors With User Defined Function into count or sum cells based on de conditional formating?

I've tried with

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double

Application.Volatile
Dim rng As Range
For Each rng In pRange1

If rng.FormatConditions.Font.Color = pRange2.FormatConditions.Font.Color Then
CountColour = CountColour + 1

End If
Next
End Function

But it appears not to work, any suggestion?
Thanks
This comment was minimized by the moderator on the site
Hello, Borja,
May be you can use our product, Kutools for Excel, with its Count by Color feature, you can quickly count or sum the cell values based on the conditional formatting without any VBA code, please try. You can download it and free trial in 60 day.
Thank you!
This comment was minimized by the moderator on the site
I tried the SumByColor. It works, but not if the numbers have been coloured by conditional formatting. For example, I have a list of different numbers that are coloured red if they are within a range set by a conditional formatting rule. I would then like to sum only the red-coloured numbers. But the SumByColor VBA code does not work in this situation. Any suggestions to make it work. Thanks
This comment was minimized by the moderator on the site
Hello, Xiahui,
The above code can not applied to conditional formatting color, but, you can use our Kutools for Excel' Count by color feature, with it, you can quickly get the result for counting or summing based on the conditional formatting color. See the below screenshot:
This comment was minimized by the moderator on the site
Hey
Nice macro. I used it to just count from a simple matrix. The problem is that the macro counts also empty cells. How to exclude empty cells from counting?
This comment was minimized by the moderator on the site
Hello, Kriss,
To count the cells based on font color excluding the blank cells, please apply the below User Defined Function, please try:

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double
Application.Volatile
Dim rng As Range
For Each rng In pRange1
If rng.Value <> "" Then
If rng.Font.Color = pRange2.Font.Color Then
CountColour = CountColour + 1
End If
End If
Next
End Function
This comment was minimized by the moderator on the site
Exactly what I was looking for! This will save me lots of time. Thank You
This comment was minimized by the moderator on the site
Muito obrigada já ajudou muito, porém a minha formula só adiciona à soma outro número quando eu uso o pincel para mudar a cor, se eu trocar a cor da fonte pela barra de ferramenta não dá certo, alguém saber me explicar -
This comment was minimized by the moderator on the site
This was SO helpful - Thanks very much!
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations