Pada dasarnya Microsoft Excel bisa untuk menghitung jumlah sel yang berisi text menggunakan rumus COUNTA, atau jika ingin menghitung jumlah sel yang berisi angka menggunakan rumus COUNT. Sedangkan untuk menghitung sel dengan kriteria tertentu kita bisa menggunakan rumus COUNTIF.
Sekarang pertanyaannya jika yang ingin kita hitung hanya sel yang ada warnanya (ada background) tetapi tetapi menggunakan kriteria tertentu, baik angka maupun text.
Lihat contoh tabel berikut:
Pada tabel di atas yang terhitung hanya jumlah sel dalam range yang berwarna (ada background). Sebagai ambil contoh kita pakai kriteria angka "5", pada range tersebut total angka 5 sebanyak 4 sel tetapi dari hasil perhitungan hanya terhitung 2 karena hanya ada 2 angka 5 pada sel berwarna.
Untuk melakukan perhitungan tersebut dibutuhkan kode VBA yang nantinya digunakan sebagai function.
Cara menambahkan kode VBA:
- Aktifkan jendela Visual Basic Editor (tekan Alt+F11)
- Klik menu Insert > Module
- Masukkan kode berikut
Function CountColour(rng As Range, srchfor As String) As Long
Application.Volatile
Dim c As Range
For Each c In rng
If c.Interior.ColorIndex <> xlNone And UCase(c.Value) = UCase(srchfor) Then
CountColour = CountColour + 1
End If
Next
End Function
Application.Volatile
Dim c As Range
For Each c In rng
If c.Interior.ColorIndex <> xlNone And UCase(c.Value) = UCase(srchfor) Then
CountColour = CountColour + 1
End If
Next
End Function
Cara Menggunakan Fungsi:
Format penulisannya adalah
=countcolour(range;criteria)
Contoh:
=countcolour(C3:C12;C15)
Range C3:C12 adalah kumpulan sel yang ingin dijumlahkan
Range C15 adalah kriteria tertentu sebagai acuan penjumlahan
Selain cara di atas kita juga bisa menambahkan Excel Add-Ins untuk menambahkan fungsi menghitung jumlah sel dengan kriteria warna. Caranya sebagai berikut:
1. Download file Add-Ins CountColour di sini.
2. Buka Microsoft Excel, klik tombol Office button
3. Klik Excel Option
4. Tekan tombol Go..., maka akan muncul jendela Add-Ins, kemudian pilih Browse dan cari file countcolour yang sudah anda download tadi, terakhir tekan OK.
Jika muncul jendel Macro Security pilih Enable Macro supaya macro bisa dijalankan.
LINK DOWNLOAD:
thanks buat infonya sob,, sangat bermanfaat sekali
BalasHapus=countcolour(range;criteria)saya pake ini engga bisa, pake ini =countcolour(range,criteria) bisa, pake koma aja.
BalasHapusTerima Kasih, Mantaps
BalasHapus