I used it to count and sum from matrix. The problem is that the I need to count/sum in multiple range of cells. Is it possible to update this code to do this?

## How to count or sum cells based on the font colors in Excel?

How could you get the number of cells or sum all the cells which contain a particular font color in Excel? For example, I have a range of data in a worksheet as following screenshot shown, and now I want to respectively count or sum the cells that have a red, blue and black font color. Normally, there is no direct way to deal with this task, here, I will talk about some tricks for soling this job.

**Count or sum cells based on font colors with User Defined Function**

**Count or sum cells based on font color with some useful functions**

**Count or sum cells based on font color with an amazing feature-Count by Color**

** Count or sum cells based on font colors with User Defined Function**

** Count cells based on font colors:**

To calculate the number of cells with specific font colors, please do as these:

**1**. Hold down the **ALT + F11** keys, and it opens the **Microsoft Visual Basic for Applications window**.

**2**. Click** Insert** > **Module**, and paste the following code in the **Module Window**.

**VBA code: Count cells based on font colors:**

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double 'Update by Extendoffice Application.Volatile Dim rng As Range For Each rng In pRange1 If rng.Font.Color = pRange2.Font.Color Then CountColour = CountColour + 1 End If Next End Function

**3**. Then save this code and go back to the worksheet, and then enter this formula in to a blank cell **=CountColour(A1:D10,A2)** , see screenshot:

**Note**: In the above formula, * A1:D10* is the range that you want to use and

*is the cell with a particular font color that you want to count.*

**A2****4**. After typing the formula, press **Enter** key, and you will get the number of cells with red font colors. If you want to count other font colored cells, please repeatedly enter the formula as possible as you need. You will get the following results:

** Sum cells based on font colors:**

To sum cells based on font colors, the following User Defined Function can help you.

**1**. Hold down the **ALT + F11** keys, and it opens the **Microsoft Visual Basic for Applications window**.

**2**. Click **Insert** > **Module**, and paste the following code in the **Module Window**.

**VBA code: Sum cells based on font colors:**

Public Function SumByColor(pRange1 As Range, pRange2 As Range) As Double 'Update by Extendoffice Application.Volatile Dim rng As Range Dim xTotal As Double xTotal = 0 For Each rng In pRange1 If rng.Font.Color = pRange2.Font.Color Then xTotal = xTotal + rng.Value End If Next SumByColor = xTotal End Function

**3**. Then save this code and return to the original worksheet, and then enter this formula **=SumByColor(A1:D8,A1)** into a blank cell, see screenshot:

**Note**: In the above formula, * A1:D10* is the range that you want to use and

*is the cell with a particular font color that you want to sum.*

**A2****4**. Then press **Enter** key, and you will add up all cells with red font colors. If you want to sum other font colored cells, please repeatedly enter the formula. You will get the following result:

** Count or sum cells based on font color with some useful functions**

May be the User Defined Function is troublesome for you to save and apply, here, I will recommend you a handy tool-**Kutools for Excel**, with its advanced functions, you can solve this task quickly and easily.

**Tips:**To apply this **COUNTBYFONTCOLOR** and **SUMBYFONTCOLOR** features, firstly, you should download the **Kutools for Excel**, and then apply the feature quickly and easily.

After installing **Kutools for Excel**, please do as this:

** Count cells based on font colors:**

**1**. Click a cell where you want to put the count result, and then click **Kutools** > **Kutools Functions** > **Statistical & Math** > **COUNTBYFONTCOLOR**,see screenshot:

**2**. In the **Function Arguments** dialog box, specify the data range and color index cell that you want to count by font color, see screenshot:

**3**. And then, click **OK** button, you will get the first count result, to get other results, you just need to copy this formula and change the cell references to your need. See screenshot:

** Sum cells based on font colors:**

**1**. Click a cell where you want to put the count result, and then click **Kutools** > **Kutools Functions** > **Statistical & Math** > **SUMBYFONTCOLOR**,see screenshot:

**2**. In the **Function Arguments** dialog box, specify the data range and color index cell that you want to sum by font color, see screenshot:

**3**. And then, click **OK** button, you will get the first sum result, to get other results, you just need to copy this formula and change the cell references to your need. See screenshot:

**Click to Download Kutools for Excel and free trial Now! **

** Count or sum cells based on font color with an amazing feature-Count by Color**

**Kutools for Excel** also provides an easy feature-** Count by Color**, with this utility, you can quickly get the calculation result such as count, sum, average cells and so on by the background color, font color, conditional formatting as you need.

**Tips:**To apply this **Count by Color** feature, firstly, you should download the **Kutools for Excel**, and then apply the feature quickly and easily.

After installing **Kutools for Excel**, please do as this:

**1**. Select the data range that you want to count and sum based on different colors.

**2**. Click **Kutools Plus**> **Count by Color**, see screenshot:

**3**. In the **Count by Color** dialog box, choose **Standard formatting** from the **Color method** drop down, and select **Font** under the **Count type** drop down, and the cells with same font colors have been counted, added up, averaged and so on, see screenshot:

**4**. And then click **Generate report** button, you will get the statistics in a new workbook. See screenshot:

**Click to Download Kutools for Excel and free trial Now! **

** More articles:**

**Count And Sum Cells Based On Background Color In Excel**- Supposing you have a range of cells with different background colors, such as red, green, blue and so on, but now you need to count how many cells in that range have a certain background color and sum the colored cells with the same certain color. In Excel, there is no direct formula to calculate Sum and Count of color cells, here I will introduce you some ways to solve this problem.

**Sum / Count Bold Numbers In A Range Of Cells In Excel**- When you have a data range which contains some bold numbers in a worksheet, and now you want to sum or count only the bold cells, of course you can add them up one by one manually, but it will be time-consuming. How could you sum or count only the bold cells in Excel with an easy and quick way?

**Apply Color Gradient Across Multiple Cells**- In Excel, we can easily fill background color to a cell or multiple cells, but, sometimes, we need the color be filled gradient as following screenshot shown, how could get the color gradient in a cell or across multiple cells in Excel?

**Concatenate Cell Columns And Keep Text Color In Excel**- As we all known, while concatenating or combining cell columns into one column, the cell formatting (such as text font color, number formatting, etc) will be lost. This article, I will introduce some tricks to combine the cell columns into one and keep the text color as easily as possible in Excel.

**Count Or Sum Cells Based On Cell Color In Google Sheet**- Counting or summing cell values based on specific cell background color to get the result as following screenshot shown. This article, I will talk about how to solve this task in Google sheet and Microsoft Excel.

**Count or sum cells based on font / background / conditional formatting color: **

**Kutools for Excel**: with more than 300 handy Excel add-ins, free to try with no limitation in 30 days.

**Download and free trial Now!**

### The Best Office Productivity Tools

#### Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by 80%

**Reuse**: Quickly insert**complex formulas, charts**and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails...- Super Formula Bar (easily edit multiple lines of text and formula); Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range...
- Merge Cells/Rows/Columns without losing Data; Split Cells Content; Combine Duplicate Rows/Columns... Prevent Duplicate Cells; Compare Ranges...
- Select Duplicate or Unique Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
- Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
- Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
- Super Filter (save and apply filter schemes to other sheets); Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
- Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
- More than 300 powerful features. Supports Office/Excel 2007-2019 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features 30-day free trial. 60-day money back guarantee.

#### Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier

**Enable tabbed editing and reading in Word, Excel, PowerPoint**, Publisher, Access, Visio and Project.- Open and create multiple documents in new tabs of the same window, rather than in new windows.
- Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!