Gå til hovedindhold

Hvordan tæller eller summerer celler baseret på skrifttypefarverne i Excel?

Hvordan kunne du få antallet af celler eller opsummere alle de celler, der indeholder en bestemt skrifttypefarve i Excel? For eksempel har jeg en række data i et regneark som følgende skærmbillede vist, og nu vil jeg henholdsvis tælle eller summere cellerne, der har en rød, blå og sort skrifttypefarve. Normalt er der ingen direkte måde at håndtere denne opgave på, her vil jeg tale om nogle tricks til at løse dette job.

Tæl eller sum celler baseret på skrifttypefarver med brugerdefineret funktion

Tæl eller summer celler baseret på skrifttypefarve med nogle nyttige funktioner

Tæl eller sum celler baseret på skrifttypefarve med en fantastisk funktion-Tæl efter farve


Tæl eller sum celler baseret på skrifttypefarver med brugerdefineret funktion

Tæl celler baseret på skrifttypefarver:

For at beregne antallet af celler med specifikke skrifttypefarver skal du gøre følgende:

1. Hold nede ALT + F11 tasterne, og det åbner Vinduet Microsoft Visual Basic til applikationer.

2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.

VBA-kode: Tæl celler baseret på skrifttypefarver:

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. Gem derefter denne kode og gå tilbage til regnearket, og indtast derefter denne formel i en tom celle = CountColour (A1: D10, A2) , se skærmbillede:

Bemærk: I ovenstående formel A1: D10 er det område, du vil bruge, og A2 er cellen med en bestemt skriftfarve, som du vil tælle.

4. Når du har skrevet formlen, skal du trykke på Indtast nøgle, og du får antallet af celler med røde skrifttypefarver. Hvis du vil tælle andre skrifttypefarvede celler, skal du gentagne gange indtaste formlen, som du har brug for. Du får følgende resultater:


Sumceller baseret på skrifttypefarver:

For at opsummere celler baseret på skrifttypefarver kan følgende brugerdefinerede funktion hjælpe dig.

1. Hold nede ALT + F11 tasterne, og det åbner Vinduet Microsoft Visual Basic til applikationer.

2. Klik indsatte > Moduler, og indsæt følgende kode i Modul vindue.

VBA-kode: Sumceller baseret på skrifttypefarver:

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. Gem derefter denne kode, og vend tilbage til det originale regneark, og indtast derefter denne formel = SumByColor (A1: D8, A1) ind i en tom celle, se skærmbillede:

Bemærk: I ovenstående formel A1: D10 er det område, du vil bruge, og A2 er cellen med en bestemt skriftfarve, som du vil sammenfatte.

4. Tryk derefter på Indtast nøgle, og du tilføjer alle celler med røde skrifttypefarver. Hvis du vil sammenfatte andre skrifttypefarvede celler, skal du gentagne gange indtaste formlen. Du får følgende resultat:


Tæl eller summer celler baseret på skrifttypefarve med nogle nyttige funktioner

Kan være den brugerdefinerede funktion er besværligt for dig at gemme og anvende, her vil jeg anbefale dig et praktisk værktøj-Kutools til Excelmed sine avancerede funktioner kan du løse denne opgave hurtigt og nemt.

tips:At anvende dette COUNTBYFONTFARVE , SUMBYFONTFARVE funktioner, for det første skal du downloade Kutools til Excel, og anvend derefter funktionen hurtigt og nemt.

Efter installation Kutools til Excelskal du gøre som dette:

Tæl celler baseret på skrifttypefarver:

1. Klik på en celle, hvor du vil placere optællingsresultatet, og klik derefter på Kutools > Kutools Funktioner > Statistisk og matematik > COUNTBYFONTFARVE, se skærmbillede:

2. I Funktionsargumenter dialogboks, angiv det dataområde og farveindekscelle, som du vil tælle efter skriftfarve, se skærmbillede:

3. Klik derefter på OK for at få andre resultater, skal du bare kopiere denne formel og ændre cellehenvisningerne til dit behov. Se skærmbillede:


Sumceller baseret på skrifttypefarver:

1. Klik på en celle, hvor du vil placere optællingsresultatet, og klik derefter på Kutools > Kutools Funktioner > Statistisk og matematik > SUMBYFONTFARVE, se skærmbillede:

2. I Funktionsargumenter dialogboks, angiv det dataområde og farveindekscelle, som du vil opsummere efter skriftfarve, se skærmbillede:

3. Klik derefter på OK knappen, får du det første sumresultat for at få andre resultater, du skal bare kopiere denne formel og ændre cellehenvisningerne til dit behov. Se skærmbillede:

Klik for at downloade Kutools til Excel og gratis prøveversion nu!


Tæl eller sum celler baseret på skrifttypefarve med en fantastisk funktion-Tæl efter farve

Kutools til Excel giver også en nem funktion- Tæl efter farve, med dette værktøj kan du hurtigt få beregningsresultatet såsom antal, sum, gennemsnitlige celler og så videre efter baggrundsfarve, skriftfarve, betinget formatering, som du har brug for.

tips:At anvende dette Tæl efter farve funktion, for det første skal du downloade Kutools til Excel, og anvend derefter funktionen hurtigt og nemt.

Efter installation Kutools til Excelskal du gøre som dette:

1. Vælg det dataområde, som du vil tælle, og sum dem ud fra forskellige farver.

2. Klik Kutools Plus> Tæl efter farve, se skærmbillede:

3. I Tæl efter farve dialogboksen, vælg Standardformatering fra Farvemetode drop down, og vælg font under Tælle type drop down, og cellerne med samme skrifttypefarver er talt, tilføjet, gennemsnit og så videre, se skærmbillede:

4. Og klik derefter på Generer rapport knappen, får du statistikken i en ny projektmappe. Se skærmbillede:

Klik for at downloade Kutools til Excel og gratis prøveversion nu!


Flere artikler:

  • Tæl og sum celler baseret på baggrundsfarve i Excel
  • Antag, at du har en række celler med forskellige baggrundsfarver, såsom rød, grøn, blå og så videre, men nu skal du tælle, hvor mange celler i det område, der har en bestemt baggrundsfarve og summe de farvede celler med den samme bestemte farve . I Excel er der ingen direkte formel til beregning af sum og antal farveceller, her vil jeg introducere dig nogle måder at løse dette problem på.
  • Summen / tælle fed skrift i en række celler i Excel
  • Når du har et datainterval, der indeholder nogle dristige tal i et regneark, og nu vil du kun sammenfatte eller tælle de dristige celler, kan du selvfølgelig tilføje dem en efter en manuelt, men det vil være tidskrævende. Hvordan kunne du kun sammenfatte eller tælle de dristige celler i Excel på en nem og hurtig måde?
  • Påfør farvegradient på tværs af flere celler
  • I Excel kan vi nemt udfylde baggrundsfarve til en celle eller flere celler, men nogle gange har vi brug for, at farven udfyldes gradient som vist nedenstående skærmbillede, hvordan kunne farvefarven i en celle eller på tværs af flere celler i Excel?
  • Sammenkæd cellekolonner og hold tekstfarve i Excel
  • Som vi alle vidste, vil celleformatering (såsom tekstfarve, antal formatering osv.) Gå tabt, når du sammenkæder eller kombinerer cellekolonner i en kolonne. Denne artikel vil jeg introducere nogle tricks til at kombinere cellekolonnerne i en og holde tekstfarven så let som muligt i Excel.

Tæl eller summer celler baseret på skrifttype / baggrund / betinget formateringsfarve:

Kutools til Excel: med mere end 300 praktiske Excel-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 30 dage. Download og gratis prøveversion nu!

Bedste kontorproduktivitetsværktøjer

🤖 Kutools AI Aide: Revolutionér dataanalyse baseret på: Intelligent udførelse   |  Generer kode  |  Opret brugerdefinerede formler  |  Analyser data og generer diagrammer  |  Aktiver Kutools funktioner...
Populære funktioner: Find, fremhæv eller identificer dubletter   |  Slet tomme rækker   |  Kombiner kolonner eller celler uden at miste data   |   Runde uden formel ...
Super opslag: VLookup med flere kriterier    Multiple Value VLookup  |   VOpslag på tværs af flere ark   |   Fuzzy Lookup ....
Avanceret rulleliste: Opret hurtigt rulleliste   |  Afhængig rulleliste   |  Multivælg rulleliste ....
Column Manager: Tilføj et bestemt antal kolonner  |  Flyt kolonner  |  Skift synlighedsstatus for skjulte kolonner  |  Sammenlign områder og kolonner ...
Fremhævede funktioner: Grid fokus   |  Designvisning   |   Stor Formel Bar    Arbejdsbog & Ark Manager   |  Ressourcebibliotek (Autotekst)   |  Datovælger   |  Kombiner regneark   |  Krypter/Dekrypter celler    Send e-mails efter liste   |  Superfilter   |   Specielt filter (filter fed/kursiv/gennemstreget...) ...
Top 15 værktøjssæt12 tekst Værktøjer (tilføje tekst, Fjern tegn, ...)   |   50 + Chart Typer (Gantt kort, ...)   |   40+ Praktisk formler (Beregn alder baseret på fødselsdag, ...)   |   19 Indsættelse Værktøjer (Indsæt QR-kode, Indsæt billede fra sti, ...)   |   12 Konvertering Værktøjer (Tal til ord, Valutaomregning, ...)   |   7 Flet og del Værktøjer (Avancerede kombinere rækker, Opdel celler, ...)   |   ... og mere

Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid.  Klik her for at få den funktion, du har mest brug for...

Beskrivelse


Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere

  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver 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