Cum se numără / se sumează celulele după culori cu formatare condiționată în Excel?
În Excel, puteți colora unele celule utilizând formatarea condiționată. Acum, acest tutorial vă va spune câteva metode la îndemână și ușoare pentru a număra sau însuma rapid celulele în funcție de culoare, cu formatarea condiționată în Excel.
Numărați celulele după culoarea fontului și fundalul după VBA
Numărați / sumați celulele după culoarea fontului cu formatarea condiționată de Kutools pentru Excel
Numărați celulele după font și culoarea de fundal după VBA
În Excel, numai codul VBA poate număra rapid celulele pe baza unui anumit font și a unei culori de fundal.
1. presa Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. clic Insera > Module și copiați și lipiți sub codul VBA în fereastra popping Module fereastră.
VBA: Numărați celulele pe baza unui font și a unei culori de fundal.
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. clic Alerga sau apăsați F5 pentru a rula codul, apoi selectați intervalul de care aveți nevoie în caseta de dialog popping. Vedeți captura de ecran:
4. clic OK, apoi selectați o celulă al cărei font și culoare de fundal doriți să le numărați pe celule. Vedeți captura de ecran:
5. clic OK. Apoi apare un dialog pentru a vă spune câte celule au aceeași culoare de fundal și aceeași culoare a fontului cu celula selectată din interval.
Numărați / sumați celulele după culoarea fontului cu formatarea condiționată de Kutools pentru Excel
În Excel, nu puteți număra sau însuma celulele în funcție de culoarea fontului numai cu formatarea condiționată. Cu toate acestea, există un add-in la îndemână numit Kutools pentru Excel care vă poate ajuta să rezolvați rapid această problemă cu Numără după culoare caracteristică.
Dupa instalare gratuită Kutools pentru Excel, faceți următoarele:
1. Selectați un interval pe care doriți să-l numărați sau să sumați celulele după culoarea fontului cu formatare condiționată, apoi faceți clic pe Kutools Plus> Numără după culoare. Vedeți captura de ecran:
2. Apoi în Numără după culoare , selectați Formatarea condițională în Metoda culorii listă și Font în Tipul culorii listă. Apoi, puteți vedea rezultatul numărării și însumării în dialog. Vedeți captura de ecran:
notițe: Dacă doriți să afișați rezultatul de calcul ca raport, puteți face clic Generați raportul in Numără după culoare , apoi va fi construit un raport într-un nou registru de lucru. Vedeți captura de ecran:
Numărați / sumați celulele după culoarea fundalului cu formatarea condiționată de Kutools pentru Excel
Dacă doriți să numărați sau să sumați celulele după culoarea de fundal cu formatare condiționată, puteți aplica și Numără după culoare utilitatea Kutools pentru Excel.
1. Selectați o gamă pe care doriți să o numărați sau să sumați celulele după culoarea de fundal cu formatare condiționată, apoi faceți clic pe Kutools Plus > Numără după culoare.
Dupa instalare gratuită Kutools pentru Excel, faceți următoarele:
2. Apoi în Numără după culoare , selectați Formatarea condițională în Metoda culorii listă și Context în Tipul culorii listă. Apoi, puteți vedea rezultatul numărării și însumării în dialog. Vedeți captura de ecran:
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!