Ugrás a tartalomra

Hogyan számolhatom / összegezhetem a cellákat színek szerint, feltételes formázással az Excelben?

Az Excelben néhány cellát feltételes formázással színezhet. Ez az oktatóanyag néhány hasznos és egyszerű módszert ismertet a cellák gyors színszámlálásához vagy összegzéséhez az Excel feltételes formázásával.

Számolja a cellákat betűszín és háttér szerint VBA szerint

Cellák számlálása/összegzése betűszín szerint a Kutools for Excel feltételes formázásával jó ötlet3      játszik

Cellák számlálása/összegzése háttérszín szerint a Kutools for Excel feltételes formázásával jó ötlet3      játszik


nyíl kék jobb buborék Számolja a cellákat betűtípus és háttérszín szerint VBA szerint

Az Excel programban csak a VBA kód képes gyorsan megszámolni a cellákat egy adott betűtípus és háttérszín alapján.

1. nyomja meg Alt + F11 gombokat a megnyitáshoz Microsoft Visual Basic for Applications ablak.

2. kettyenés betétlap > Modulok és másolja és illessze be a VBA kód alá a poppingba Modulok ablak.

VBA: Számolja a cellákat betűtípus és háttérszín alapján.

Sub DisplayFormatCount()
	'Updateby20150305
	Dim Rng As Range
	Dim CountRange As Range
	Dim ColorRange As Range
	Dim xBackColor As Long
	Dim xFontColor As Long
	On Error Resume Next
	xTitleId       = "KutoolsforExcel"
	Set CountRange = Application.Selection
	Set CountRange = Application.InputBox("Count Range :", xTitleId, CountRange.Address, Type: = 8)
	Set ColorRange = Application.InputBox("Color Range(single cell):", xTitleId, Type: = 8)
	Set ColorRange = ColorRange.Range("A1")
	xReturn        = 0
	For Each Rng In CountRange
		qqq           = Rng.Value
		xxx           = Rng.DisplayFormat.Interior.Color
		If Rng.DisplayFormat.Interior.Color = ColorRange.DisplayFormat.Interior.Color Then
			xBackColor   = xBackColor + 1
		End If
		If Rng.DisplayFormat.Font.Color = ColorRange.DisplayFormat.Font.Color Then
			xFontColor = xFontColor + 1
		End If
	Next
	MsgBox "BackColor is " & xBackColor & Chr(10) & "FontColor is " & xFontColor
End Sub

3. kettyenés futás vagy nyomja meg a gombot F5 gombot a kód futtatásához, majd a felbukkanó párbeszédpanelen válassza ki a kívánt tartományt. Lásd a képernyőképet:
doc-count-by-feltételes-color-1

4. kettyenés OK, majd válasszon ki egy cellát, amelynek betűtípusa és háttérszíne alapján meg szeretné számlálni a cellákat. Lásd a képernyőképet:

doc-count-by-feltételes-color-2

5. kettyenés OK. Ezután megjelenik egy párbeszédpanel, amely megmondja, hogy hány cellának ugyanaz a háttérszíne és betűtípus-színe a tartomány kijelölt cellájával.

doc-count-by-feltételes-color-3


nyíl kék jobb buborék Cellák számlálása/összegzése betűszín szerint a Kutools for Excel feltételes formázásával

Az Excelben nem lehet számlálni vagy összegezni a cellákat betűszín szerint, csak feltételes formázással. Van azonban egy praktikus kiegészítő Kutools az Excel számára amelyek segítségével gyorsan megoldhatja ezt a problémát Számoljon szín szerint funkciót.

Kutools az Excel számára, Több mint 300 a praktikus funkciók megkönnyítik a munkáját. 

Után ingyenes telepítés Kutools for Excel, kérjük, tegye a következőket:

1. Válassza ki a számlálni kívánt tartományt, vagy összegezze a cellákat betűszín szerint feltételes formázással, majd kattintson a gombra Kutools Plus> Számoljon szín szerint. Lásd a képernyőképet:

doc-count-by-feltételes-color-4

2. Ezután a Számoljon szín szerint párbeszédablakban válassza ki Feltételes formázás alatt Színmódszer lista és betűtípus alatt Színtípus lista. Ezután a párbeszédpanelen megtekintheti a számlálás és az összegzés eredményét. Lásd a képernyőképet:

doc-count-by-feltételes-color-5

Megjegyzések: Ha jelentésként szeretné kiadni a számítási eredményt, kattintson a gombra Jelentés generálása in az Számoljon szín szerint párbeszédpanelt, akkor egy jelentés egy új munkafüzetbe kerül. Lásd a képernyőképet:

doc-count-by-feltételes-color-6      doc-count-by-feltételes-color-7


Cellák számlálása/összegzése háttérszín szerint a Kutools for Excel feltételes formázásával

Ha feltételes formázással háttérszám szerint szeretne számlálni vagy összegezni cellákat, akkor is alkalmazhatja Számoljon szín szerint hasznossága Kutools az Excel számára.

1. Válassza ki a számlálni kívánt tartományt vagy a cellákat összegezze háttérszín szerint, feltételes formázással, majd kattintson a gombra Kutools Plus > Számoljon szín szerint.

Után ingyenes telepítés Kutools for Excel, kérjük, tegye a következőket:

2. Ezután a Számoljon szín szerint párbeszédablakban válassza ki Feltételes formázás alatt Színmódszer lista és Háttér alatt Színtípus lista. Ezután a párbeszédpanelen megtekintheti a számlálás és az összegzés eredményét. Lásd a képernyőképet:

doc-count-by-feltételes-color-8

Megjegyzések: Ha jelentésként szeretné kiadni a számítási eredményt, kattintson a gombra Jelentést készít a Számoljon szín szerint párbeszédpanelt, akkor egy jelentés egy új munkafüzetbe kerül. Lásd a képernyőképet:

doc-count-by-feltételes-color-9

Kattintson ide, ha többet szeretne megtudni a Színes számolásról.

Tipp.A Számoljon szín szerint segédprogrammal, a cellákat háttérszín vagy betűszín alapján is megszámolhatja/összegezheti/átlagolhatja, csak szabványos formázással, vagy szabványos és feltételes formázással egyaránt. Ha 30 napon belül korlátozás nélkül szeretné alkalmazni a Count by Color alkalmazást, kérjük, töltse le és ingyenes próbaverzióval rendelkezzen most.


nyíl kék jobb buborék Számítsa ki a cellákat betűtípus vagy háttérszín szerint


A legjobb irodai hatékonyságnövelő eszközök

🤖 Kutools AI Aide: Forradalmasítsa az adatelemzést a következők alapján: Intelligens végrehajtás   |  Kód létrehozása  |  Hozzon létre egyéni képleteket  |  Adatok elemzése és diagramok létrehozása  |  A Kutools funkciók meghívása...
Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

Leírás


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi,

This is a great piece of VBA and works perfectly. Are you able to modify this code to make it a function and then be used as a formula?

e.g.
=DisplayFormatCount(A14:E14,A2,False) for counting background colour (Count Range, Colour Match Cell, type)

=DisplayFormatCount(C29:D29,A2,True) for counting font colour

I would like to you something like this for an input form of many tables and validation fields that are compulsory. I would then be able to count how many fields that have not been completed correctly.


Cheers
This comment was minimized by the moderator on the site
Could you please teach me VBA codes I would like to learn VBA using excel sheet
This comment was minimized by the moderator on the site
Chào bạn.

VBA đếm ô màu rất hay, tuy nhiên bạn có thể sửa giúp mình để kết quả không hiện thành msg box mà hiện luôn trên ô excel chỉ định được không? thêm cả hàm sum, average nữa thì càng tốt :D . Mail của mình là . Mình cám ơn.
This comment was minimized by the moderator on the site
Hi,
How do I modified the code for the cell contain conditional formatting? Because it count the background as "blank".


Thanks.
This comment was minimized by the moderator on the site
Sorry I have no idea about the VBA code.
This comment was minimized by the moderator on the site
May I congratulate you on a most easily understood and well written VBA program to perform such a simple task - i.e., count the number of cells with a specific color derived from Conditional Formatting. It beats the pants of the monster program by Pearson, and his does not even work, at least in Excel 2013. Nor do other supposed counting programs work that I have tried. Yours is the only one!! This worked perfectly. Thank you, thank you, thank you. Best Holiday Wishes, Mort in Dallas
This comment was minimized by the moderator on the site
hi


kindly send the above VBA code same code is I need please help.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations