Note: The other languages of the website are Google-translated. Back to English

Sut i gyfrif / crynhoi celloedd yn ôl lliwiau gyda fformatio amodol yn Excel?

Yn Excel, gallwch liwio rhai celloedd trwy ddefnyddio fformatio amodol. Nawr bydd y tiwtorial hwn yn dweud wrthych rai dulliau defnyddiol a hawdd i gyfrif neu grynhoi'r celloedd yn ôl lliw gyda fformatio amodol yn Excel.

Cyfrif celloedd yn ôl lliw ffont a chefndir yn ôl VBA

Cyfrif / swm celloedd yn ôl lliw ffont gyda fformatio amodol gan Kutools ar gyfer Excel syniad da3      chwarae

Cyfrif / swm celloedd yn ôl lliw cefndir gyda fformatio amodol gan Kutools ar gyfer Excel syniad da3      chwarae


swigen dde glas saeth Cyfrif celloedd yn ôl ffont a lliw cefndir yn ôl VBA

Yn Excel, dim ond cod VBA all gyfrif celloedd yn gyflym yn seiliedig ar ffont penodol a lliw cefndir.

1. Gwasgwch Alt + F11 allweddi i agor Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau a chopïo a gludo islaw cod VBA i'r popping Modiwlau ffenestr.

VBA: Cyfrif celloedd yn seiliedig ar ffont a lliw cefndir.

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. Cliciwch Run botwm neu wasg F5 allwedd i redeg y cod, yna dewiswch yr ystod sydd ei hangen arnoch yn y dialog popping. Gweler y screenshot:
doc-cyfrif-wrth-amodol-lliw-1

4. Cliciwch OK, yna dewiswch gell y mae ei ffont a'i lliw cefndir rydych chi am gyfrif y celloedd yn seiliedig arni. Gweler y screenshot:

doc-cyfrif-wrth-amodol-lliw-2

5. Cliciwch OK. Yna mae deialog yn galw allan i ddweud wrthych faint o gelloedd sydd â'r un lliw cefndir a lliw ffont â'r gell a ddewiswyd yn yr ystod.

doc-cyfrif-wrth-amodol-lliw-3


swigen dde glas saeth Cyfrif / swm celloedd yn ôl lliw ffont gyda fformatio amodol gan Kutools ar gyfer Excel

Yn Excel, ni allwch gyfrif na chrynhoi'r celloedd yn ôl lliw ffont gyda fformatio amodol yn unig. Fodd bynnag, mae yna ychwanegiad defnyddiol o'r enw Kutools ar gyfer Excel gall hynny eich helpu i ddatrys y broblem hon yn gyflym Cyfrif yn ôl Lliw nodwedd.

Kutools ar gyfer Excel, gyda mwy na 300 swyddogaethau defnyddiol, yn gwneud eich swyddi yn haws. 

Ar ôl gosod am ddim Kutools ar gyfer Excel, gwnewch fel y nodir isod:

1. Dewiswch ystod rydych chi am ei chyfrif neu ei symio yn ôl lliw ffont gyda fformatio amodol, yna cliciwch Kutools Byd Gwaith> Cyfrif yn ôl Lliw. Gweler y screenshot:

doc-cyfrif-wrth-amodol-lliw-4

2. Yna yn y Cyfrif yn ôl Lliw deialog, dewiswch Fformatio Amodol dan Dull lliw rhestr a Ffont dan Math o Lliw rhestr. Yna gallwch weld canlyniad cyfrif a chrynhoi yn y dialog. Gweler y screenshot:

doc-cyfrif-wrth-amodol-lliw-5

Nodyn: Os ydych chi am allbwn y canlyniad cyfrifo fel adroddiad, gallwch glicio Cynhyrchu adroddiad in y Cyfrif yn ôl Lliw deialog, yna bydd adroddiad yn cael ei gynnwys mewn llyfr gwaith newydd. Gweler y screenshot:

doc-cyfrif-wrth-amodol-lliw-6      doc-cyfrif-wrth-amodol-lliw-7


Cyfrif / swm celloedd yn ôl lliw cefndir gyda fformatio amodol gan Kutools ar gyfer Excel

Os ydych chi am gyfrif neu symio celloedd yn ôl lliw cefndir gyda fformatio amodol, gallwch hefyd wneud cais Cyfrif yn ôl Lliw cyfleustodau Kutools ar gyfer Excel.

1. Dewiswch ystod rydych chi am ei chyfrif neu symio celloedd yn ôl lliw cefndir gyda fformatio amodol, yna cliciwch Kutools Byd Gwaith > Cyfrif yn ôl Lliw.

Ar ôl gosod am ddim Kutools ar gyfer Excel, gwnewch fel y nodir isod:

2. Yna yn y Cyfrif yn ôl Lliw deialog, dewiswch Fformatio Amodol dan Dull lliw rhestr a Cefndir dan Math o Lliw rhestr. Yna gallwch weld canlyniad cyfrif a chrynhoi yn y dialog. Gweler y screenshot:

doc-cyfrif-wrth-amodol-lliw-8

Nodyn: Os ydych chi am allbwn y canlyniad cyfrifo fel adroddiad, gallwch glicio Cynhyrchu adroddiad yn y Cyfrif yn ôl Lliw deialog, yna bydd adroddiad yn cael ei gynnwys mewn llyfr gwaith newydd. Gweler y screenshot:

doc-cyfrif-wrth-amodol-lliw-9

Cliciwch yma i gael mwy o wybodaeth ar Count by Colour.

Awgrym.gyda Cyfrif yn ôl Lliw cyfleustodau, gallwch hefyd gyfrif / swm / cyfartaledd y celloedd yn ôl lliw cefndir neu liw ffont gyda fformatio safonol yn unig neu'r ddau o fformat safonol ac amodol. Os ydych chi am wneud cais Cyfrif yn ôl Lliw heb gyfyngiad mewn 30 diwrnod, lawrlwythwch a chael treial am ddim nawr.


swigen dde glas saeth Cyfrifwch gelloedd yn ôl lliw ffont neu liw cefndir



Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (7)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
A gaf eich llongyfarch ar raglen VBA hawdd ei deall ac sydd wedi'i hysgrifennu'n dda i gyflawni tasg mor syml - hy, cyfrif nifer y celloedd â lliw penodol sy'n deillio o Fformatio Amodol. Mae'n curo pants y rhaglen anghenfil gan Pearson, ac nid yw ei hyd yn oed yn gweithio, o leiaf yn Excel 2013. Nid yw rhaglenni cyfrif tybiedig eraill ychwaith yn gweithio yr wyf wedi rhoi cynnig arnynt. Yr eiddoch yw'r unig un!! Gweithiodd hyn yn berffaith. Diolch, diolch, diolch. Dymuniadau Gwyliau Gorau, Mort yn Dallas
Lleihawyd y sylw hwn gan y safonwr ar y wefan
hi


anfonwch y cod VBA uchod yr un cod yn garedig, mae angen help arnaf.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Heia,
Sut ydw i'n addasu'r cod ar gyfer y gell sy'n cynnwys fformatio amodol? Oherwydd ei fod yn cyfrif y cefndir fel "gwag".


Diolch.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae'n ddrwg gennyf, nid oes gennyf unrhyw syniad am y cod VBA.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Chao 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 tren ố Ự chện ịc excel chị ệhện ị Ỳc excel chị ệhện excel? têm cả hàm swm, cyfartaledd nữa thì càng tốt :D . Mail của mình là tranvanlong.dne@gmail.com. Mình cám ơn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
A allech chi ddysgu codau VBA i mi os gwelwch yn dda Hoffwn ddysgu VBA gan ddefnyddio dalen excel
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Heia,

Mae hwn yn ddarn gwych o VBA ac yn gweithio'n berffaith. A allwch chi addasu'r cod hwn i'w wneud yn ffwythiant ac yna cael ei ddefnyddio fel fformiwla?

ee
=DisplayFormatCount(A14:E14,A2,Gau) ar gyfer cyfrif lliw cefndir (Ystod Cyfrif, Cell Cyfateb Lliw, math)

=DisplayFormatCount(C29:D29,A2,Gwir) ar gyfer cyfrif lliw ffont

Hoffwn i chi rywbeth fel hyn ar gyfer ffurf mewnbwn o lawer o dablau a meysydd dilysu sy'n orfodol. Byddwn wedyn yn gallu cyfrif faint o feysydd sydd heb eu cwblhau'n gywir.


Cheers
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir