Untuk Menghindari Pemalsuan Sertifikat Resmi Lembaga Kursus Potensi Nusantara, Cek Status Alumni yang SAH Terdaftar Klik disini


AYO KURSUS KOMPUTER DAN TOEFL ONLINE (BUKTI PEMBAYARAN PESERTA KURSUS ONLINE) KLIK DISINI

TRYOUT TOEFL ONLINE GRATISS SERENTAK SEINDONESIA KLIK DISINI


IZIN KEMENDIKBUD REPUBLIK INDONESIA/ NOMOR INDUK LEMBAGA KURSUS NASIONAL: 07118.1.0035

Lembaga Kursus Potensi Nusantara Menawarkan Paket Kemitraan Berwirausaha (Kerjasama Membuka Cabang Lembaga Kursus Potensi Nusantara Baru)
Untuk Info lebih lanjut Klik Disini

Menghitung Jumlah Sel Dengan Kriteria Warna

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

Nampaknya sampai dengan saat ini, solusi terbaik untuk menghitung banyaknya sel yang berwarna tertentu adalah dengan menggunakan VBA.

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

Code VBA untuk menghitung banyak sel dengan kriteria warna tergolong sangat singkat. Perhatikan contoh 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 digunakan dalam lembar kerja excel, setelah 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
window vba excel













  • Dari jendela VBA, klik menu Insert , dan klik module
cara membuat module baru di vba excel

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

cara menulis code ke module vba

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


Penjelasan fungsi:

Fungsi hitungWarna dapat digunakan untuk menghitung banyaknya sel didalam rangeWarna yang memiliki warna sama dengan selAcuan.


Contohnya:

selAcuan   = D1

rangeWarna = A1:B5

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

=hitungwarna(D1,A1:B5)

Sesuai contoh gambar berikut:

contoh rumus hitung sel sesuai warna

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


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

Semoga bermanfaat.


Baca juga artikel belajar excel lainnya:

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


Sertifikatkan kemampuan Komputer dan Bahasa Inggris anda
Sertifikat Komputer dan TOEFL tanpa ikut kursus
, Ikuti Paket Ujian Saja

Klik Disini

PROGRAM KURSUS MASUK DESA
LEMBAGA PENDIDIKAN POTENSI NUSANTARA MEMBUKA KURSUS KOMPUTER ONLINE BERSERTIFIKAT, PAKET MICROSOFT OFFICE (WINDOWS,WORD,EXCEL,POWER POINT) DAN PAKET DESAIN GRAFIS (ADOBE PHOTOSHOP,COREL DRAW & ADOBE INDESIGN). BIAYA SANGAT TERJANGKAU, INFO LANJUT
KLIK DISINI

SERTIFIKATKAN KEMAMPUAN KOMPUTER KAMU TANPA IKUT KURSUS

TANGGAPAN PESERTA KURSUS