Menghitung Jumlah Sel Dengan Kriteria Warna

Bagaimana cara menghitung jumlah sel dengan kriteria warna tertentu? Pertanyaan ini kerap muncul di forum-forum diskusi mengenai excel.

Nampaknya hingga dengan ketika ini, solusi terbaik untuk menghitung banyaknya sel yang berwarna tertentu yaitu dengan memakai VBA.


Nah, dalam kesempatan ini je-xcel akan menawarkan tips singkat bagaimana menciptakan UDF (User Defined Function) untuk menghitung banyaknya sel dalam sebuah range yang mempunyai warna tertentu.

Code VBA untuk menghitung banyak sel dengan kriteria warna tergolong sangat singkat. Perhatikan teladan berikut:

Function hitungWarna(selAcuan As Range, rangeWarna As Range)
Dim sel As Range
For Each sel In rangeWarna
    If sel.Interior.Color = selAcuan.Interior.Color Then
        hitungWarna = hitungWarna + 1
    End If
Next
End Function

UDF hitungWarna dapat dipakai dalam lembar kerja excel, sehabis code diatas diketik atau dicopy pada module standar dalam jendela VBA, caranya sebagai berikut

• Masuk dulu ke dalam jendela VBA dengan cara tekan shorcut ALT+F11

• Dari jendela VBA, klik sajian Insert , dan klik module

• Maka lalu akan muncul module standar yang baru. Copy atau ketik code di atas ke dalam module:

• Save as file excel dengan type  file Excel macro enable workbook atau Excel binary workbook
• Sampai pada tahap ini, fungsi hitungWarna sudah sanggup dipakai dalam lembar kerja excel.

Penjelasan fungsi:

Fungsi hitungWarna sanggup dipakai untuk menghitung banyaknya sel didalam rangeWarna yang mempunyai warna sama dengan selAcuan.

Contohnya:

selAcuan   = D1

rangeWarna = A1:B5

Maka untuk menghitung banyaknya sel di range A1:B5 yang mempunyai warna yang sama dengan sel D1 sanggup dituliskan rumusnya sebagai berikut:

=hitungwarna(D1,A1:B5)

Sesuai teladan gambar berikut:

Dari gambar tersebut, sanggup disimpulkan bahwa fungsi hitungWarna berhasil menghitung banyaknya warna yang sama dengan sel D1 (kuning) pada range A1:B5.  (dalam teladan ada 3 warna)


Demikian tips singkat bagaimana memakai code VBA untuk menghitung banyaknya sel dengan kriteria warna.

Semoga bermanfaat.


Baca juga artikel berguru excel lainnya:

• Cara Cepat Membuat Hyperlink dengan VBA
• Macro untuk Setting Comment
• Macro untuk Melihat dan Menyembunyikan Comment dengan Cepat