如何查找Excel表格内所有红色字体

发布网友

我来回答

共5个回答

热心网友

打开excel文件，CTRL+F（查找），弹出的对话框点击“格式”的右边倒三角（见图1），接着选择“从单元格选择格式”（见图2），然后用鼠标从单元格中选择一个红色字体的单元格后返回查找页面，点击“查找全部”。

附图示：

热心网友

Sub searchredfont()
Dim a, b As Range, c As Integer
Set a = ActiveSheet.UsedRange
For Each b In a
If b.Font.ColorIndex = 3 Then c = c + 1
Next b
MsgBox c
End Sub

把上面的宏代码放在一个模块里面运行，就可以统计当前工作表里面
用红色字体的单元格数目！

热心网友

07版本可以直接筛选出来包含红色字体的行。

热心网友

2003也可以根据“格式”查找

热心网友

2007好像可以根据字体颜色查找吧!
我用的2003!