Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս Excel- ում տառատեսակի գույների հիման վրա հաշվել կամ գումարել բջիջները:

Ինչպե՞ս կարող եք ստանալ բջիջների քանակը կամ գումարել բոլոր այն բջիջները, որոնք պարունակում են որոշակի տառատեսակի գույն Excel- ում: Օրինակ, ես ունեմ աշխատանքային թերթում տվյալների մի շարք, ինչպես ցույց է տրված սքրինշոթից, և այժմ ուզում եմ համապատասխանաբար հաշվել կամ ամփոփել կարմիր, կապույտ և սեւ տառատեսակների գույն ունեցող բջիջները: Սովորաբար, այս խնդիրը լուծելու ուղղակի միջոց գոյություն չունի, այստեղ ես կխոսեմ այս աշխատանքը լուծելու որոշ հնարքների մասին:

Հաշվի՛ր կամ գումարիր բջիջները ՝ հիմնված տառատեսակի գույների վրա, օգտագործողի կողմից սահմանված գործառույթով

Հաշվեք կամ գումարեք բջիջները `հիմնված տառատեսակի գույնի վրա, որոշ օգտակար գործառույթներով

Հաշվեք կամ գումարեք բջիջները ՝ հիմնված տառատեսակի գույնի վրա, զարմանալի հատկանիշով. Հաշվեք գույնով


Հաշվի՛ր կամ գումարիր բջիջները ՝ հիմնված տառատեսակի գույների վրա, օգտագործողի կողմից սահմանված գործառույթով

Հաշվեք բջիջները ՝ հիմնված տառատեսակի գույների վրա.

Տառատեսակի հատուկ գույներով բջիջների քանակը հաշվարկելու համար խնդրում ենք անել հետևյալ կերպ.

1, Պահեք պահեք ALT + F11 ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլի պատուհան.

VBA կոդ. Հաշվեք բջիջները ՝ հիմնված տառատեսակի գույների վրա.

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, Դրանից հետո պահեք այս կոդը և վերադառնալ աշխատանքային թերթ, ապա մուտքագրեք այս բանաձևը դատարկ բջիջ = CountColour (A1: D10, A2) , տես նկարի նկարը.

ՆշումՎերոհիշյալ բանաձևում A1: D10 այն ընդգրկույթն է, որը ցանկանում եք օգտագործել և A2 որոշակի տառատեսակի գույնով բջիջ է, որը ցանկանում եք հաշվել:

4, Բանաձևը մուտքագրելուց հետո սեղմեք Մտնել ստեղնը, և դուք կստանաք կարմիր տառատեսակի գույներով բջիջների քանակը: Եթե ​​ցանկանում եք հաշվել տառատեսակների գունավոր այլ բջիջներ, խնդրում ենք բազմիցս մուտքագրել բանաձևը, որքան հնարավոր է: Դուք կստանաք հետևյալ արդյունքները.


Տառատեսակի գույների վրա հիմնված գումարային բջիջներ.

Տառատեսակի գույների վրա հիմնված բջիջներն ամփոփելու համար օգտագործողի կողմից սահմանված հետևյալ գործառույթը կարող է օգնել ձեզ:

1, Պահեք պահեք ALT + F11 ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլի պատուհան.

VBA կոդ. Տառատեսակի գույների վրա հիմնված գումարային բջիջներ.

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, Դրանից հետո պահեք այս կոդը և վերադարձեք սկզբնական աշխատանքային թերթին, ապա մուտքագրեք այս բանաձևը = SumByColor (A1: D8, A1) դատարկ բջիջի մեջ, տես նկարի նկարը.

ՆշումՎերոհիշյալ բանաձևում A1: D10 այն ընդգրկույթն է, որը ցանկանում եք օգտագործել և A2 որոշակի տառատեսակի գույնով բջիջ է, որը ցանկանում եք ամփոփել:

4, Դրանից հետո սեղմեք Մտնել ստեղնը, և դուք կավելացնեք բոլոր տառատեսակները կարմիր տառատեսակի գույներով: Եթե ​​ցանկանում եք ամփոփել տառատեսակի գունավոր այլ բջիջները, խնդրում ենք բազմիցս մուտքագրել բանաձևը: Դուք կստանաք հետևյալ արդյունքը.


Հաշվեք կամ գումարեք բջիջները `հիմնված տառատեսակի գույնի վրա, որոշ օգտակար գործառույթներով

Կարող է լինել օգտագործողի կողմից սահմանված գործառույթը ձեզ համար դժվար է խնայել և կիրառել, այստեղ ես ձեզ խորհուրդ կտամ մի հարմար գործիք-Excel- ի համար նախատեսված գործիքներ, իր առաջադեմ գործառույթներով, դուք կարող եք արագ և հեշտությամբ լուծել այս խնդիրը:

Հուշում.Սա կիրառելու համար COUNTBYFONTCOLOR և SUMBYFONTCOLOR առանձնահատկությունները, նախ, դուք պետք է ներբեռնեք այն Excel- ի համար նախատեսված գործիքներ, ապա գործառույթը կիրառեք արագ և հեշտությամբ:

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներԽնդրում եմ արեք հետևյալ կերպ

Հաշվեք բջիջները ՝ հիմնված տառատեսակի գույների վրա.

1, Սեղմեք այն բջիջը, որտեղ ցանկանում եք տեղադրել հաշվարկի արդյունքը, ապա կտտացնել Կուտոլս > Kutools գործառույթները > Վիճակագրական և մաթեմատիկա > COUNTBYFONTCOLOR, տես նկարի նկարը.

2, Մեջ Գործառույթի փաստարկները երկխոսության տուփ, նշեք տվյալների տիրույթը և գունային ինդեքսի բջիջը, որը ցանկանում եք հաշվել տառատեսակի գույնով, տես նկարի նկարը.

3, Եվ հետո, կտտացրեք OK կոճակը, դուք կստանաք առաջին հաշվարկի արդյունքը, այլ արդյունքներ ստանալու համար պարզապես անհրաժեշտ է պատճենել այս բանաձևը և փոխել բջիջների հղումները ձեր կարիքի վրա: Տեսեք,


Տառատեսակի գույների վրա հիմնված գումարային բջիջներ.

1, Սեղմեք այն բջիջը, որտեղ ցանկանում եք տեղադրել հաշվարկի արդյունքը, ապա կտտացնել Կուտոլս > Kutools գործառույթները > Վիճակագրական և մաթեմատիկա > SUMBYFONTCOLOR, տես նկարի նկարը.

2, Մեջ Գործառույթի փաստարկները երկխոսության տուփ, նշեք տվյալների տիրույթը և գունային ինդեքսի բջիջը, որը ցանկանում եք ամփոփել ըստ տառատեսակի գույնի, տե՛ս նկարը.

3, Եվ հետո, կտտացրեք OK կոճակը, դուք կստանաք առաջին գումարի արդյունքը, այլ արդյունքներ ստանալու համար, պարզապես անհրաժեշտ է պատճենել այս բանաձևը և փոխել բջիջների հղումները ձեր կարիքի վրա: Տեսեք,

Կտտացրեք Excel- ի և անվճար փորձաշրջանի համար Kutools- ը ներբեռնելու համար:


Հաշվեք կամ գումարեք բջիջները ՝ հիմնված տառատեսակի գույնի վրա, զարմանալի հատկանիշով. Հաշվեք գույնով

Excel- ի համար նախատեսված գործիքներ նաև ապահովում է հեշտ հատկություն- Հաշվել ըստ գույնի, այս օգտակարության միջոցով դուք կարող եք արագորեն ստանալ հաշվարկի արդյունքը, ինչպիսիք են հաշվարկը, գումարը, միջին բջիջները և այլն ըստ ֆոնի գույնի, տառատեսակի գույնի, պայմանական ձևավորման, ինչպես ձեզ հարկավոր է:

Հուշում.Սա կիրառելու համար Հաշվել ըստ գույնի հատկությունը, նախ, դուք պետք է ներբեռնեք այն Excel- ի համար նախատեսված գործիքներ, ապա գործառույթը կիրառեք արագ և հեշտությամբ:

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներԽնդրում եմ արեք հետևյալ կերպ

1, Ընտրեք տվյալների տիրույթը, որը ցանկանում եք հաշվել և ամփոփել `հիմնվելով տարբեր գույների վրա:

2: Սեղմեք Kutools Plus> Հաշվել ըստ գույնի, տես նկարի նկարը.

3, Մեջ Հաշվել ըստ գույնի երկխոսության վանդակում, ընտրեք Ստանդարտ ձևաչափում - ից Գույնի մեթոդը բաց թողեք եւ ընտրեք Տառատեսակի տակ Հաշվարկի տեսակը բաց թողեք, և տառատեսակի նույն գույներով բջիջները հաշվել են, ավելացվել, միջինացվել և այլն, տե՛ս նկարը.

4. Եվ այնուհետեւ կտտացրեք Ստեղծել զեկույց կոճակը, դուք կստանաք վիճակագրությունը նոր աշխատանքային գրքում: Տեսեք,

Կտտացրեք Excel- ի և անվճար փորձաշրջանի համար Kutools- ը ներբեռնելու համար:


Այլ հոդվածներ.

  • Excel- ում ֆոնի գույնի հիման վրա հաշվել և գումարել բջիջները
  • Ենթադրելով, որ դուք ունեք մի շարք բջիջներ, որոնք ունեն տարբեր ֆոնային գույներ, ինչպիսիք են կարմիրը, կանաչը, կապույտը և այլն, բայց այժմ դուք պետք է հաշվեք, թե այդ տիրույթի քանի բջիջ ունի որոշակի ֆոնային գույն և ամփոփեք նույն գույնի գունավոր բջիջները , Excel- ում գոյություն չունի գունային բջիջների գումարը և հաշվարկը հաշվարկելու ուղղակի բանաձև, այստեղ ես ձեզ կներկայացնեմ այս խնդրի լուծման մի քանի եղանակներ:
  • Excel- ում մի շարք բջիջների գումարած / հաշված համարձակ թվեր
  • Երբ ունեք տվյալների տիրույթ, որը աշխատանքային թերթում պարունակում է համարձակ թվեր, և այժմ ցանկանում եք ամփոփել կամ հաշվել միայն համարձակ բջիջները, իհարկե, դրանք մեկ առ մեկ կարող եք ավելացնել ձեռքով, բայց դա ժամանակատար է: Ինչպե՞ս կարող եք Excel- ում պարզ և հաշվել համարձակ բջիջները հեշտ և արագ եղանակով:
  • Համակցեք բջիջների սյունները և պահեք տեքստի գույնը Excel- ում
  • Ինչպես մենք բոլորս գիտեինք, բջիջների սյունները մեկ սյունակում միավորելիս կամ միացնելիս բջջի ձևաչափումը (օրինակ `տեքստի տառատեսակի գույնը, համարի ձևաչափումը և այլն) կկորչի: Այս հոդվածում ես կներկայացնեմ որոշ հնարքներ `բջջային սյունները մեկում միավորելու և տեքստի գույնը հնարավորինս հեշտությամբ պահելու համար Excel- ում:

Հաշվել կամ գումարել բջիջները ՝ հիմնված տառատեսակի / ֆոնի / պայմանական ձևավորման գույնի վրա.

Excel- ի համար նախատեսված գործիքներ. Excel- ի ավելի քան 300 հարմարավետ հավելումներով, 30 օրվա ընթացքում անվճար փորձեք առանց սահմանափակումների: Ներբեռնեք և անվճար փորձեք հիմա:

Գրասենյակի արտադրողականության լավագույն գործիքները

🤖 Kutools AI օգնականՀեղափոխություն կատարել տվյալների վերլուծության հիման վրա՝ Խելացի կատարում   |  Ստեղծեք ծածկագիր  |  Ստեղծեք հատուկ բանաձևեր  |  Վերլուծել տվյալները և ստեղծել գծապատկերներ  |  Invoke Kutools-ի գործառույթները...
Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
Super Փնտրել: Բազմաթիվ չափանիշների VLookup    Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar    Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները    Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
Լավագույն 15 գործիքների հավաքածու12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50+ Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

Նկարագրություն


Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
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