Loncat ke daftar isi utama

Bagaimana cara menghitung atau menjumlahkan sel berdasarkan warna font di Excel?

Bagaimana Anda bisa mendapatkan jumlah sel atau menjumlahkan semua sel yang berisi warna font tertentu di Excel? Misalnya, saya memiliki berbagai data dalam lembar kerja seperti gambar berikut yang ditunjukkan, dan sekarang saya ingin menghitung atau menjumlahkan sel yang memiliki warna font merah, biru dan hitam. Biasanya, tidak ada cara langsung untuk menangani tugas ini, di sini, saya akan membicarakan beberapa trik untuk menyelesaikan pekerjaan ini.

Hitung atau jumlahkan sel berdasarkan warna font dengan User Defined Function

Hitung atau jumlahkan sel berdasarkan warna font dengan beberapa fungsi yang berguna

Hitung atau jumlahkan sel berdasarkan warna font dengan fitur Hitung dengan Warna yang menakjubkan


Hitung atau jumlahkan sel berdasarkan warna font dengan User Defined Function

Hitung sel berdasarkan warna font:

Untuk menghitung jumlah sel dengan warna font tertentu, lakukan seperti ini:

1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic for Applications.

2. Klik Menyisipkan > Modul, dan tempel kode berikut di Jendela Modul.

Kode VBA: Hitung sel berdasarkan warna font:

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. Kemudian simpan kode ini dan kembali ke lembar kerja, lalu masukkan rumus ini ke dalam sel kosong = CountColour (A1: D10, A2) , lihat tangkapan layar:

Note: Dalam rumus di atas, A1: D10 adalah rentang yang ingin Anda gunakan dan A2 adalah sel dengan warna font tertentu yang ingin Anda hitung.

4. Setelah mengetik rumus, tekan Enter kunci, dan Anda akan mendapatkan jumlah sel dengan warna font merah. Jika Anda ingin menghitung sel berwarna font lainnya, harap masukkan rumus berulang kali sesuka Anda. Anda akan mendapatkan hasil sebagai berikut:


Jumlahkan sel berdasarkan warna font:

Untuk menjumlahkan sel berdasarkan warna font, Fungsi Buatan Pengguna berikut dapat membantu Anda.

1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic for Applications.

2. Klik Menyisipkan > Modul, dan tempel kode berikut di Jendela Modul.

Kode VBA: Jumlahkan sel berdasarkan warna font:

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. Kemudian simpan kode ini dan kembali ke lembar kerja asli, lalu masukkan rumus ini = SumByColor (A1: D8, A1) ke dalam sel kosong, lihat tangkapan layar:

Note: Dalam rumus di atas, A1: D10 adalah rentang yang ingin Anda gunakan dan A2 adalah sel dengan warna font tertentu yang ingin Anda jumlahkan.

4. Lalu tekan Enter kunci, dan Anda akan menambahkan semua sel dengan warna font merah. Jika Anda ingin menjumlahkan sel berwarna font lainnya, harap masukkan rumus berulang kali. Anda akan mendapatkan hasil sebagai berikut:


Hitung atau jumlahkan sel berdasarkan warna font dengan beberapa fungsi yang berguna

Mungkin Fungsi Buatan Pengguna merepotkan Anda untuk menyimpan dan menerapkan, di sini, saya akan merekomendasikan Anda alat yang berguna-Kutools untuk Excel, dengan fungsi lanjutannya, Anda dapat menyelesaikan tugas ini dengan cepat dan mudah.

Tip:Untuk menerapkan ini COUNTBYFONTCOLOR dan SUMBYFONTCOLOR fitur, pertama, Anda harus mengunduh Kutools untuk Excel, lalu terapkan fitur dengan cepat dan mudah.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

Hitung sel berdasarkan warna font:

1. Klik sel tempat Anda ingin meletakkan hasil penghitungan, lalu klik Kutools > Fungsi Kutools > Statistik & Matematika > COUNTBYFONTCOLOR, lihat tangkapan layar:

2. di Argumen Fungsi kotak dialog, tentukan rentang data dan sel indeks warna yang ingin Anda hitung berdasarkan warna font, lihat tangkapan layar:

3. Dan kemudian, klik OK tombol, Anda akan mendapatkan hasil penghitungan pertama, untuk mendapatkan hasil lainnya, Anda hanya perlu menyalin rumus ini dan mengubah referensi sel sesuai kebutuhan Anda. Lihat tangkapan layar:


Jumlahkan sel berdasarkan warna font:

1. Klik sel tempat Anda ingin meletakkan hasil penghitungan, lalu klik Kutools > Fungsi Kutools > Statistik & Matematika > SUMBYFONTCOLOR, lihat tangkapan layar:

2. di Argumen Fungsi kotak dialog, tentukan rentang data dan sel indeks warna yang ingin Anda jumlahkan dengan warna font, lihat tangkapan layar:

3. Dan kemudian, klik OK tombol, Anda akan mendapatkan hasil penjumlahan pertama, untuk mendapatkan hasil lainnya, Anda hanya perlu menyalin rumus ini dan mengubah referensi sel sesuai kebutuhan Anda. Lihat tangkapan layar:

Klik untuk Mengunduh Kutools for Excel dan uji coba gratis Sekarang!


Hitung atau jumlahkan sel berdasarkan warna font dengan fitur Hitung dengan Warna yang menakjubkan

Kutools untuk Excel juga menyediakan fitur yang mudah- Hitung dengan Warna, dengan utilitas ini, Anda dapat dengan cepat mendapatkan hasil kalkulasi seperti jumlah, jumlah, sel rata-rata, dan seterusnya berdasarkan warna latar belakang, warna font, pemformatan bersyarat yang Anda butuhkan.

Tip:Untuk menerapkan ini Hitung dengan Warna fitur, pertama, Anda harus mengunduh Kutools untuk Excel, lalu terapkan fitur dengan cepat dan mudah.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Pilih rentang data yang ingin Anda hitung dan jumlahkan berdasarkan warna yang berbeda.

2. Klik Kutools Ditambah> Hitung dengan Warna, lihat tangkapan layar:

3. di Hitung dengan Warna kotak dialog, pilih Pemformatan standar dari Metode warna drop down, dan pilih Font bawah Jenis hitung drop down, dan sel dengan warna font yang sama telah dihitung, ditambahkan, dirata-ratakan dan seterusnya, lihat tangkapan layar:

4. Dan kemudian klik Buat laporan tombol, Anda akan mendapatkan statistik di buku kerja baru. Lihat tangkapan layar:

Klik untuk Mengunduh Kutools for Excel dan uji coba gratis Sekarang!


Artikel lainnya:

  • Hitung Dan Jumlah Sel Berdasarkan Warna Latar Belakang Di Excel
  • Misalkan Anda memiliki rentang sel dengan warna latar berbeda, seperti merah, hijau, biru, dan sebagainya, tetapi sekarang Anda perlu menghitung berapa banyak sel dalam rentang itu yang memiliki warna latar tertentu dan menjumlahkan sel berwarna dengan warna tertentu yang sama . Di Excel, tidak ada rumus langsung untuk menghitung Jumlah dan Jumlah sel warna, di sini saya akan memperkenalkan beberapa cara untuk mengatasi masalah ini.
  • Menjumlahkan / Menghitung Bilangan Tebal Dalam Berbagai Sel Di Excel
  • Saat Anda memiliki rentang data yang berisi beberapa angka tebal di lembar kerja, dan sekarang Anda ingin menjumlahkan atau menghitung hanya sel yang dicetak tebal, tentunya Anda dapat menambahkannya satu per satu secara manual, tetapi akan memakan waktu. Bagaimana Anda bisa menjumlahkan atau menghitung hanya sel tebal di Excel dengan cara yang mudah dan cepat?
  • Terapkan Gradien Warna di Beberapa Sel
  • Di Excel, kita dapat dengan mudah mengisi warna latar belakang ke sel atau beberapa sel, tetapi, terkadang, kita membutuhkan warna yang diisi gradien seperti gambar berikut yang ditampilkan, bagaimana bisa mendapatkan gradien warna dalam sel atau di beberapa sel di Excel?
  • Gabungkan Kolom Sel Dan Pertahankan Warna Teks Di Excel
  • Seperti yang kita semua ketahui, saat menggabungkan atau menggabungkan kolom sel menjadi satu kolom, pemformatan sel (seperti warna font teks, pemformatan angka, dll) akan hilang. Artikel ini, saya akan memperkenalkan beberapa trik untuk menggabungkan kolom sel menjadi satu dan menjaga warna teks semudah mungkin di Excel.
  • Hitung Atau Jumlah Sel Berdasarkan Warna Sel Di Google Sheet
  • Menghitung atau menjumlahkan nilai sel berdasarkan warna latar belakang sel tertentu untuk mendapatkan hasil seperti gambar berikut yang ditampilkan. Artikel ini, saya akan berbicara tentang bagaimana menyelesaikan tugas ini di Google sheet dan Microsoft Excel.

Hitung atau jumlahkan sel berdasarkan font / latar belakang / warna pemformatan bersyarat:

Kutools untuk Excel: dengan lebih dari 300 add-in Excel yang praktis, gratis untuk dicoba tanpa batasan dalam 30 hari. Unduh dan uji coba gratis Sekarang!

Alat Produktivitas Kantor Terbaik

Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu.  Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...

tab kte 201905


Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah

  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
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