Excel表格中可以通过VBA编程来统计带有颜色的数字个数。
宏代码如下：
Sub 计算带颜色的单元格()
Dim i%
Dim Nc%
For i = 1 To 5
If Cells(1, i).Font.Color <> 0 Then Nc = Nc + 1
Next i
MsgBox Nc
End Sub
1、输入基本数据。在A列、B列、C列、D列、E列输入基本数据。
2、调出VBA编辑器。在excel里点击鼠标右键，点击“查看代码”热键。
3、把以上代码输入到VBA编辑器里。关闭VBA编辑器。
4、调出刚才新建的VBA宏。在excel表格上方，点击“宏”按钮，再点击“查看宏”按钮。
5、运行宏。调出刚才保存的宏后，点击键盘确认键运行宏。
6、显示带有颜色的数字个数总和。
Visual Basic for Applications (VBA)，是 Microsoft Office 里的一种编程语言. 但由上面的定义，它完全不是一种宏语言。然而，它的功能已经从中发展并最终替代了用户应用程序的宏思想，所以它被广泛地错误地称为是一种宏语言。
VBA 可以访问许多操作系统函数并支持文档打开时自动执行宏。这使得用这种语言写计算机病毒成为可能。1990年代中后期，宏病毒成为了最流行的计算机病毒类型之一。其它的包括宏语言的项目，如openoffice.org，故意从其宏语言中排除了一些功能（如：自动执行）以避免破坏程序。然而，这一特性在很多事务中受到欢迎。
1.如下面这张表，产品是以颜色分类统计的。
2.选中有颜色的列——开始——条件格式——突出显示单元格规则——等于。
3.大红色——自定义格式——填充——选大红色——确定——确定。
4.然后再：条件格式——突出显示单元格规则——等于。
黄色——自定义格式——填充——选黄色——确定——确定。
5.同理定义完其它颜色。
6.这时在下面的单元格里输入颜色的名称，就自动出现填充相对应的颜色了。
7.在I3单元格里输入公式=COUNTIF(D3:H3,"*色")。
8.选中I3单元格——单击右键——设置单元格格式——数字——自定义——
#“种”。
9.在I4单元格里输入公式=SUM(D4:H4)。
10.然后将公式填充到下方单元格。
可以利用辅助行或辅助表来统计，
辅助行：就是在该行下插入一行
辅助表：就是在另一工作表中统计
操作步骤如下：
1、定义名称：点击该行，按鼠标右键--定义名称：color=GET.CELL(24,Sheet1!A2)，其中24，表示，提取字体颜色，名称：color，引用位置：=get.cell(24,A2)---确定
2、利用辅助表来实现吧，在sheet2中对应单元格输入=IF(color=1,0,1)；（快捷输入法：（在某格区域快捷输入相同内容的方法：选定区域--输入内容--按ctrl+回车键）
解释：字体无颜色，color返回1，有颜色返回其他值
这样就可以统计出带颜色字体单元格个数了。
另外，如果统计带颜色充填单元格个数，只需将公式=get.cell(24,A2)中的24，该为38即可。