如何统计excel中字体为蓝色的单元格数目？

Question

如题。excel是2003的

Answer 1

①利用查找功能，Ctrl+F，根据下图操作

在左下角就看到找到的单元格数目了。

②使用VBA，2010版方法：开发工具-visual basic（左侧第一个）此步骤可以在工作表标签上右键，查看代码 来打开,在打开的窗口中，选中插入-模块-双击插入的模块，将下边代码复制到窗口中。使用方法是，在单元格中输入公式=countcolziti(参数1，参数2)，参数1为统计个数的单元格范围，参数2为统计字体颜色的任意一个单元格，如=countcolziti(a1:c5,a1)。

Function Countcolziti(countrange As Range, col As Range) As Integer

    Dim icell As Range

    Application.Volatile

    For Each icell In countrange

        If icell.Font.ColorIndex = col.Font.ColorIndex Then

            Countcolziti = Countcolziti + 1

        End If

    Next icell

End Function

③利用宏表函数get.cell获取单元格字体颜色代码，方法：公式-定义名称（见下图）

注意公式中的A1不要写成$A$1，ZTS是我自己定义的名称，你也随便编，汉字也行，然后在其他单元格输入=ZTS，回车，拖动公式，得到统计范围内各个字体的颜色代码，上图中有两种（红色和金色），然后在另外一个单元格用公式，假设统计红色=countif(e1:g7,3)

Answer 2

简单的办法是：用excel自带的查找功能，Ctrl+F,设置查找的格式--》字体--》选择颜色，设为蓝色，确定后点击“查找全部”，下面会列出所有蓝色的单元格，并告诉你总共有多少个。本回答被提问者采纳

Answer 3

宏表函数。
假定有颜色数据在a列，全选a列——菜单——插入——名称——定义——“当前工作薄中的名称”一行中填入一个名称，比如XX，
引用位置下面输入 =get.cell(24,$a1)
在空白列假定C1中输入=XX，公式下拉。这时单元格中出现不同的数字，红色的是3，无色的是0，蓝色是5…

统计单元格个数：=countif(c:c,5)

Answer 4

首先将被统计区域选中，按菜单”筛选“,然后点击指定字体颜色列的列标题旁的小三角下拉按钮，选择”按“颜色筛选”下的子菜单“按字体颜色筛选”里的蓝色，将选出的部分进行求和即可（用函数、或鼠标选中后状态栏自动求和）
以上操作适用于EXCEL2007及以上版本。对于EXCEL2003及以下版本需要通过VBA编程实现了。

Answer 5

要用VBA编写一个函数或宏来实现。QQ:369866705

Answer 6

用函数COUNTIF能解决

Answer 7

excel2003本身是没有这个功能的，推荐你换用2007……