Menghitung Jumlah Nilai cell yang berwarna tertentu - belajar exvel vba

Menghitung Jumlah Nilai  cell yang berwarna tertentu

Anda pernah mencoba menghitung sel dengan warna di Excel, 
Anda mungkin telah memperhatikan bahwa Excel tidak mengandung
 fungsi untuk mencapai ini.

Karena fungsi seperti COUNTIF tidak dapat dihitung berdasarkan
 warna sel, kita harus membuat fungsi kustom kita sendiri 
(juga dikenal sebagai Fungsi yang Ditetapkan Pengguna atau UDF) untuk menyelesaikan pekerjaan.

Fungsi Kustom untuk Menghitung Sel dengan Warna

buka Visual Basic Editor dengan menekan Alt + F11 atau
 dengan mengklik tombol Visual Basic

Buatlah Sebuah Modul dan pastekan Kode berikut

PASTEKAN PADA  MODUL

'----------------------------

Function SumByColor(CellColor As Range, SumRange As Range)

Application.Volatile

Dim ICol As Integer

Dim TCell As Range

ICol = CellColor.Interior.ColorIndex

For Each TCell In SumRange

If ICol = TCell.Interior.ColorIndex Then

SumByColor = SumByColor + TCell.Value

End If

Next TCell

End Function

Pada table yg telah kita buat seperti gambar diatas dibuat 
dengan  warna cell yang berbeda beda  Kemudian buatlah rumus  di g4

=SumByColor(F4,$B$4:$D$11)

Selesai

Silahkan anda coba !

semoga bermanfaat