Have you ever got into situation in office where you need to count the cells in Excel sheet with specific color? If yes then you can use following code which counts the number of cells with specific color (here it is yellow) and put the count in cell
It is worth to mention that the above code does not count the cells where colors are coming through conditional formatting. You can use DisplayFormat.Interior.Color to get the conditional formatting colors (DisplayFormat.Interior.Color works only on Excel 2010 or above) or read this post
Public Function CountColorCells(rng As Range) As Long
'Variable declaration
Dim lColorCounter As Long
Dim rngCell As Range
'loop throught each cell in the range
For Each rngCell In rng
'Checking Yellor color
If Cells(rngCell.Row, rngCell.Column).Interior.Color = RGB(255, 255, 0) Then
lColorCounter = lColorCounter + 1
End If
Next
'Return the value
CountColorCells = lColorCounter
End Function
To use this code in your Excel file, follow below steps:
Here I have counted the cells with yellow color. You can change RGB (#,#,#) code to count other colors. You can find RGB codes of any color using following steps
That’s all, in the ‘Color’ dialog box, you can view the RGB (Red, Green, Blue) codes of the color
If you are look for a code to sum the cells based on it’s color then you can read this post.
In this tutorial, I will show you three ways to count colored cells in Excel (with and without VBA):
WEEKDAY function applies to a Date and returns the output for Day of the week. The output of the function varies from 0 to 7
Excel Function- WORKDAY.INTL WORKDAY.INTL function is an advanced version of WORKDAY function with additional advantage of “Custom weekend options” For Example, with WORKDAY function weekends are treated as “Saturday and Sundays” however if you need…
FIND function is used to find the position of text, or character in an available string.
How to count words in Excel using the LEN function along with other Excel functions. It also gives formulas for counting words or text, whether case-sensitive or not, in a cell or range.
How to find duplicates in excel? Hope you read the post “Remove Duplicates in Excel”. Now I am going to explain how you can find these duplicates. There are multiple methods available to Find and…
UPPER function is used for changing the text/string to UPPER case in Microsoft Excel. The output of the function returns value in new cell.
It doesn’t work with conditional formatting because the cell color does not really change
This code does not work with conditional formatting however we made it work. So please read below article to count colored cells with conditional formatting.
Count Colored Cells with Conditional Formatting
Hope you like the article. Please comment if you liked the solution. 🙂
Happy Reading!