Excel：如果字体颜色为红色，则返回特定文本或执行其他操作

Author: Xiaoyang Last Modified: 2025-07-31

如何在另一个单元格中的字体颜色为红色时返回特定文本，如下截图所示？本文将介绍一些基于Excel中红色字体文本进行操作的技巧。

if the font color is red then return a specific text

如果字体颜色为红色，则在另一个单元格中返回特定文本

如果字体颜色为红色，则高亮显示该单元格

如果字体颜色为红色，则更改字体颜色

使用“查找和替换”功能
使用一个实用功能

如果字体颜色为红色，则在另一个单元格中返回特定文本

要在另一个单元格中根据字体颜色是否为红色返回特定文本，请按照以下步骤操作：

1. 同时按下 Alt+ F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 接着，点击插入 > 模块，复制并将以下 VBA 代码粘贴到窗口中。

VBA代码：如果字体颜色为红色，则返回特定文本

Function FontColorisRed(Rng As Range)
'Updateby ExtendOffice
    Application.Volatile
    If Rng.Font.ColorIndex = 3 Then
    FontColorisRed = "Fail"
    Else
    FontColorisRed = "Pass"
    End If
End Function

注意：在上述代码中，如果字体颜色为红色，则返回文本“Fail”，如果不是红色，则返回文本“Pass”。您可以根据需要更改这两个文本。

3. 然后，关闭代码窗口，并输入此公式：=FontColorISRed(B2)，然后向下拖动填充柄以获取其他结果，参见截图：

apply a formula to return a specific text if font color is red

使用 Kutools AI 解锁 Excel 魔法

智能执行：执行单元格操作、分析数据和创建图表——所有这些都由简单命令驱动。
自定义公式：生成量身定制的公式，优化您的工作流程。
VBA 编码：轻松编写和实现 VBA 代码。
公式解释：轻松理解复杂公式。
文本翻译：打破电子表格中的语言障碍。

通过人工智能驱动的工具增强您的 Excel 能力。立即下载，体验前所未有的高效！

如果字体颜色为红色，则高亮显示该单元格

如果要根据红色字体高亮显示单元格，请按以下步骤操作：

1. 同时按下 Alt+ F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 接着，点击插入 > 模块，复制并将以下 VBA 代码粘贴到窗口中。

VBA代码：如果字体颜色为红色，则高亮显示该单元格

Function HighlightRedFont(pRg As Range) As Boolean
'Updateby ExtendOffice
Dim xRg As Range
Dim xBol As Boolean
xBol = False
    For Each xRg In pRg
        If xRg.Font.Color = vbRed Then
            xBol = True
        End If
    Next
  HighlightRedFont = xBol
End Function

3. 然后，关闭代码窗口，转到开始 > 条件格式 > 新建规则，参见截图：

click Home > Conditional Formatting > New Rule

4. 在弹出的新格式规则对话框中，执行以下操作：

在选择规则类型列表框中，点击 使用公式确定要设置格式的单元格；
在 格式值为此公式为真 文本框中输入此公式 =highlightredfont(B2)；
然后，点击格式按钮。

specify the options in the dialog box

5. 在 设置单元格格式 对话框中，在填充选项卡下，选择一种您想要用于高亮显示单元格的颜色，参见截图：

choose one color to highlight the cell

6. 然后，点击确定 > 确定关闭对话框。现在，具有红色字体的单元格立即被高亮显示，参见截图：

the cells with red font are highlighted

如果字体颜色为红色，则更改字体颜色

有时，您可能希望将红色字体更改为另一种字体颜色，这里我将介绍两种实现方法。

如果字体颜色为红色，则使用查找和替换功能更改字体颜色

要将红色字体颜色更改为另一种颜色，Excel 中的查找和替换功能可以帮您忙，请按照以下步骤操作：

1. 选择要更改字体颜色的数据区域，然后按 Ctrl + H 键打开 查找和替换 对话框。在打开的对话框中，点击 选项>> 按钮，参见截图：

click Options in the dialog box

2. 在扩展的对话框中，执行以下操作：

保持 查找内容 和 替换为 框为空；
在 查找内容 字段右侧，选择格式 > 从单元格选择格式，并点击一个带有红色字体的单元格；
然后，在 替换为 字段右侧，选择格式 > 格式进入 替换格式 对话框。

select Format > Choose Format From Cell, and click on a cell with red font

select Format > Format to go to the Replace Format dialog

3. 在 替换格式 对话框中，在字体选项卡下，从颜色下拉列表中选择一种您想更改的颜色，参见截图：

choose one color to change

4. 然后，点击确定关闭 替换格式 对话框，现在，在 查找和替换 对话框中点击 全部替换 按钮，所有具有红色字体的单元格都被替换为您指定的字体颜色，参见截图：

all the cells with red font are replaced with the font color you specified

注意：当您从现有单元格中选择格式时，将选取该单元格的所有格式。在这种情况下，当执行替换时，如果某个格式不完全匹配，该单元格将不会被替换。

如果字体颜色为红色，则使用一个实用功能更改字体颜色

如果您安装了 Kutools for Excel，使用其 选择类似格式单元格 功能，您可以选择具有红色字体的单元格，然后根据需要快速更改字体颜色。

Kutools for Excel 提供了超过 300 种高级功能，简化复杂任务，提升创造力与效率。 通过集成 AI 能力，Kutools 能够精准自动执行任务，让数据管理变得轻松简单。Kutools for Excel 的详细信息... 免费试用...

安装 Kutools for Excel 后，请按以下步骤操作：

1. 选择要使用的数据区域，然后点击 Kutools > 选择 > 选择类似格式单元格，参见截图：

click Kutools > Select > Select Cells with Format

2. 在 选择类似格式单元格 对话框中，点击 从单元格选择格式 按钮。然后，选择一个带有红色字体的单元格，该单元格的所有属性都会显示在下面的列表框中。如果您想选择与基准单元格完全相同格式的所有单元格，请勾选所有属性选项；如果您只想选择仅具有红色字体的单元格，请取消勾选除 字体颜色 复选框外的所有其他属性。参见截图：

set options in the dialog box