How to count cells by color in Excel Code - Custom functions to count by color in Excel. --------- Function CountCellsByColor(data_range As Range, cell_color As Range) As Long Dim indRefColor As Long Dim cellCurrent As Range Dim cntRes As Long Application.Volatile cntRes = 0 indRefColor = cell_color.Cells(1, 1).Interior.Color For Each cellCurrent In data_range If indRefColor = cellCurrent.Interior.Color Then cntRes = cntRes 1 End If Next cellCurrent CountCellsByColor = cntRes End Function Syntax

Want to know how to colour cells in Excel to see all the students who have passed or were present in your classes? Follow Karen as she shows us how. | TeachingEnglish - British Council