KutoolsforOffice — 一套方案，五大工具。事半功倍。

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

作者小杨修改日期

在实际使用 Excel 时，字体颜色（尤其是红色）通常用于标识警告、异常、验证失败或高优先级备注。虽然手动设置或通过条件格式应用此类颜色非常简便，但若想通过公式直接检测并响应字体颜色却并非易事。例如，您可能希望在单元格文本为红色时返回自定义提示、突出显示相关单元格或调整其格式——如下所示。

本文介绍了几种在 Excel 中基于红色字体文本执行操作的实用解决方案，涵盖使用 VBA 进行检测、借助条件格式，以及运用“查找和替换”等内置工具。同时，我们还将探讨各方法的适用场景与常见陷阱，助您轻松选出最佳方案。

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

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

当您希望根据引用单元格的字体颜色是否为红色，在另一单元格中返回特定文本（如“Fail”或“Pass”）时，Excel 的内置函数无法直接实现此功能，因为其默认不支持检测字体颜色。为此，您可以使用自定义 VBA 函数（即用户定义函数，UDF），该方法能动态显示结果，并始终与字体颜色的更改保持同步。请注意，所有使用该工作簿的用户都必须启用宏，此函数才能正常运行。

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”。您可以根据需要修改这些返回文本。此外，如果您使用的是自定义红色（非 Excel 标准红色），可能需要相应调整 VBA 中的颜色代码。

3. 关闭 VBA 编辑器。现在，在工作表单元格中（例如 C2）输入以下公式：=FontColorISRed(B2)，然后向下拖动填充柄，即可将公式应用到其他行。若引用单元格的字体颜色为红色，结果将立即显示“Fail”。

应用公式，当字体颜色为红色时返回特定文本

如果更改引用单元格的字体颜色后公式似乎未更新，请尝试按 F9 键，或重新输入公式以刷新结果。请注意，与所有 VBA 解决方案一样，您的文件必须保存为启用宏的工作簿（.xlsm），并启用宏才能使用此功能。

kutools for excel ai 的屏幕截图

借助 KUTOOLS AI 解锁 Excel 的神奇功能

  • 智能执行：只需输入简单命令，即可执行单元格操作、分析数据并创建图表。
  • 自定义公式：生成量身定制的公式，助您优化工作流程！
  • VBA 编码：轻松编写并运行 VBA 代码。
  • 公式解析：轻松掌握复杂公式，一目了然！
  • 文本翻译：轻松打破电子表格中的语言障碍！
借助 AI 驱动的工具提升您的 Excel 能力。立即下载，体验前所未有的高效！

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

当您希望突出显示字体颜色为红色的单元格，以增强视觉管理或执行进一步操作时，可结合使用 VBA 函数与 Excel 的条件格式功能。此方案在需要对特定单元格进行视觉强调，并将其与现有格式规则协同应用时尤为高效。若计划共享文件，请务必妥善配置宏安全设置，因为该方法依赖宏支持。

1. 按下 Alt + F11，即可打开 VBA 编辑器。

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. 关闭 VBA 编辑器并返回 Excel。转到开始> 使用条件格式> 新建规则，如下所示：

单击“开始”>“条件格式”>“新建规则”

4. 在新建格式规则对话框中，请按以下步骤操作：

  • 在选择规则类型下，选择使用公式确定要设置格式的单元格。
  • 在公式框中输入此公式（例如，应用于 B2）：=highlightredfont(B2)
  • 单击格式按钮，即可设置所需的高亮效果。

在对话框中指定选项

5. 在设置单元格格式对话框中，切换至填充选项卡，为单元格选择突出显示颜色，然后单击确定确认您的选择：

选择一种颜色以突出显示单元格

6. 单击确定两次（每个对话框各一次），即可应用规则。具有红色字体的单元格将根据您的设置自动突出显示，如下图所示：

字体为红色的单元格已被突出显示

如果更改字体颜色后条件格式未自动更新，请尝试编辑受影响的单元格，或按 F9 键手动刷新。请注意，此方法需依赖已启用宏的自定义 VBA 函数方可生效。

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

您可能需要将所有红色字体的文本更改为其他颜色，以统一格式或更恰当地标识数据。Excel 提供了多种解决方案来满足这一需求，包括内置的“查找和替换”功能以及第三方加载项（如 Kutools for Excel）。每种方法各有优势，也需注意其适用场景。

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

Excel 的查找和替换功能支持按格式查找与替换，让您高效选中所有特定字体颜色（如红色）的单元格，并一键更改为其他颜色。此方法适用于工作表或选定区域内的快速操作，无需使用宏或加载项。

1. 选择要更改字体颜色的区域，然后按 Ctrl + H 打开查找和替换对话框。单击选项 >>即可查看更多设置，如下所示：

在对话框中单击“选项”

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

  • 将查找内容和替换为字段留空，即可专注于格式设置。
  • 在查找内容框旁，单击格式> 从单元格选择格式，然后点击一个包含您要查找的红色字体的单元格。
  • 在替换为旁，单击格式> 格式，即可打开替换格式对话框。

选择“格式”>“从单元格选择格式”，然后单击一个字体为红色的单元格

选择“格式”>“格式”以打开“替换格式”对话框

3. 在替换格式对话框中，点击字体选项卡，从颜色下拉列表中选择所需的替换颜色。确认您的设置：

选择一种颜色进行更改

4. 单击确定以退出替换格式对话框。随后，在查找和替换对话框中，单击全部替换，所有使用指定红色字体的单元格将立即更改为所选的新字体颜色：

所有字体为红色的单元格均已替换为您指定的字体颜色

注意：当您使用“从单元格选择格式”时，将使用所有格式属性进行匹配，而不仅限于字体颜色。如果您的单元格在字体大小、加粗或其他格式上存在差异，则仅会替换完全匹配的精确匹配。为获得最佳效果，请确保目标单元格除颜色外具有相同的格式。

此方法特别适用于无需启用宏的一次性批量操作。然而，若您的工作簿在工作流中需频繁更改字体颜色，建议采用自动化或更具针对性的解决方案。

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

如果您已安装 Kutools for Excel，即可使用其选择类似格式单元格功能，快速选中所有字体颜色完全相同的单元格（例如红色），并批量应用新的字体颜色。此方法比基础的查找和替换更灵活——您可将选择范围精准限定为仅字体颜色，或根据需要包含/排除其他特定格式属性。Kutools 为这些操作提供了直观易用的界面，非常适合经常在大型数据集中管理丰富格式的用户！

Kutools for Excel 提供 300 多项高级功能，简化复杂任务，提升创造力与效率。集成 AI 能力，Kutools 精准自动化任务，让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

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

1. 选择要操作的区域，然后依次点击 Kutools > 选择 > 选择类似格式单元格，如下图所示：

单击 Kutools > 选择 > 选择具有格式的单元格

2. 在选择类似格式单元格对话框中，单击从单元格选择格式，然后选择一个红色字体的单元格。您可以调整要匹配的格式属性——在此情况下，仅勾选字体颜色，即可精准匹配所有使用该红色字体的单元格，同时忽略其他格式差异。

在对话框中设置选项

3. 单击确定，在提示框中点击是以继续：

在对话框中单击“是”

4. 所有红色字体的单元格现已一次性被选中。选中后，您可随时通过 Excel 的字体颜色下拉菜单，轻松更改它们的颜色。

指定一种字体颜色以更改红色字体

此方法在处理大型区域或仅需基于颜色进行选择性格式调整时尤为高效。使用此功能时，请务必确保仅选中所需的格式属性——否则，可能会遗漏那些视觉上相似但存在细微格式差异的单元格。

提示：Kutools 还提供批量处理与撤销功能，有效防止误操作，并在选错内容或格式设置有误时，助您快速还原更改。

如果出现意外结果或目标单元格未被选中，请仔细检查对话框中是否仅勾选了正确的格式属性（例如字体颜色），并确保您的操作位于目标数据区域内。

除了上述方法外，Excel 中还有其他基于字体颜色处理数据的方式：

  • VBA 批量处理代码：如果您经常需要处理大型数据集，自定义 VBA 脚本可遍历所有单元格，并在检测到红色字体时自动执行相应操作。此方法灵活适用于批量格式设置、标记或记录匹配单元格，但需具备基础的 VBA 编程知识。
  • 手动检查结合排序：使用 Excel 的“按单元格颜色排序”或“按字体颜色排序”功能（Excel 2007 及更高版本可用），将红色字体的数据集中分组，便于快速检查或编辑。此方法特别适用于一次性任务，或无法使用宏/加载项的场景。

无论采用哪种方法，都请务必提前保存工作内容，并建议先在数据副本上试用相关操作，尤其是在执行批量处理或运行宏时。常规故障排查包括按 F9 刷新计算结果，以及在基于 VBA 的方法未按预期运行时，检查 Excel 信任中心中的宏设置。

总之，Excel 中基于字体颜色的操作并不仅限于内置公式。选择合适的工具——VBA、Excel 内置功能，还是 Kutools 等插件——应根据您的工作流频率与复杂度而定。无论采用哪种方法，都请务必仔细核对颜色代码、格式属性设置以及宏安全选项，以确保获得高效且准确的结果。

  • 超级编辑栏（轻松编辑多行文本和公式）；阅读版式（轻松阅读和编辑大量单元格）；粘贴到筛选范围……
  • 合并单元格/行/列并保留数据；分割单元格内容；合并重复行并求和/求平均值……防止重复项单元格；比较区域……
  • 选择重复或唯一行；选择空白行（所有单元格均为空）；超级查找和模糊查找多个工作簿中的内容；随机选择……
  • 精准公式复制多个单元格而不更改公式引用；自动创建引用到多个工作表；插入项目符号、复选框等更多功能……
  • 收藏并快速插入公式、区域、图表和图片；加密单元格并设置密码；创建邮件列表并发送电子邮件……
  • 提取文本、添加文本、删除某位置字符、删除空格；创建并打印数据分页统计；在单元格内容与批注之间转换……
  • 超级筛选（保存并应用筛选方案到其他工作表）；高级排序按月/周/日、频率等分组；特殊筛选按加粗、倾斜等格式……
  • 合并工作簿和工作表；汇总表格基于关键列；分割数据到多个工作表；批量转换 xls、xlsx 和 PDF……
  • 数据透视表按周数、星期几等分组……显示未锁定、选区锁定并以不同颜色标识；高亮显示包含公式/名称的单元格……
kte tab 201905
  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑与阅读，大幅提升多文档操作效率！
  • 在同一个窗口的新标签页中打开并创建多个文档，而非在新窗口中操作。
  • 将您的工作效率提升 50%，每天减少数百次鼠标点击！
officetab bottom