使用公式或定义的函数根据Excel中的单元格填充颜色自动填充文本

假设有一个填充了背景颜色红色或绿色的单元格列表，现在您想根据单元格填充颜色填充文本。例如，如下图所示，用红色填充单元格“Yes”，用绿色“No”填充单元格，既不是红色也不是绿色，填充文本“Neither”。
doc基于颜色1填充文本

使用公式根据单元格填充的颜色自动填充文本

使用方便的工具根据单元格填充的颜色自动填充文本

使用定义的功能基于另一列中的单元格填充颜色自动填充文本

示例文件

使用公式根据单元格填充的颜色自动填充文本

要使用公式根据单元格填充的颜色自动填充具有特定文本的单元格，需要首先定义一个名称。

1.选择一个单元格（假设单元格A1），单击公式 > 定义名称 ，在 定义名称 组。
doc基于颜色2填充文本

2.在 新名字 对话框，输入 我的颜色 ，在名字框，然后输入此公式

=IF(GET.CELL(38,formula!A1)=10,"No",IF(GET.CELL(38,formula!A1)=3,"Yes","Neither"))

进入指文本框。请点击 OK.
doc基于颜色3填充文本

一级方程式 表示工作表中名为“公式”的单元格A1， 10 和 3 是颜色索引，您可以根据需要更改它们。更多颜色索引，请参考本网站： http://dmcritchie.mvps.org/excel/colors.htm

现在，在充满颜色的单元格中，您可以输入此公式

=我的颜色

媒体输入键，然后您将根据单元格填充的颜色返回文本。
doc基于颜色4填充文本

使用方便的工具根据单元格填充的颜色自动填充文本

使用define name方法，每次都需要在单元格中重新键入公式，这很麻烦。在这里 Kutools for Excel，一组Excel工具， 选择具有格式的单元格 实用程序可以快速选择一种背景色的所有单元格，然后可以在其中批量输入指定的文本。

Kutools for Excel, 与超过 300 方便的功能，使您的工作更加轻松。
免费下载 30 天内免费提供全功能

后免费安装 Kutools for Excel，请执行以下操作：

1.在两个单元格中不要使用，并分别填充背景色。假设在这种情况下，我想将文本“ Go”填充到蓝色单元格中，将文本“ Stop”填充到橙色单元格中，我将橙色和蓝色填充到单元格A1和B1中。
doc基于颜色5填充文本

2.然后根据填充的颜色选择要输入文本的单元格，单击 库工具 > 选择 > 选择具有格式的单元格.
doc基于颜色6填充文本

3.在 选择具有格式的单元格 对话框中，单击 从单元格中选择格式 按钮，然后在弹出的对话框中选择A1，其中已填充了您要基于其查找单元格的颜色。
doc基于颜色7填充文本

点击 OK 返回主对话框，取消选中除填复选框，然后取消选中 忽略空白单元格 选项。点击 Ok > USB MIDI（XNUMX通道） 选择所有用蓝色填充的单元格。
doc基于颜色8填充文本 doc基于颜色9填充文本

4.现在，在编辑栏中键入特定的文本，然后按 Ctrl + Enter 键，用相同的文本填充所有选定的单元格。
doc基于颜色10填充文本

使用定义的功能基于另一列中的单元格填充颜色自动填充文本

如果要基于另一列中单元格填充的颜色填充文本，则可以使用define函数。

1。按 Alt + F11 启用 Microsoft Visual Basic应用程序 窗口。

2。点击插页 > 模块在窗口中插入空白脚本，然后复制并粘贴以下代码。

VBA：根据另一个单元格中的填充颜色填充单元格

Function GetRangeColor(xRg As Range)
'UpdatebyKutools20191125
    If (xRg.Count > 1) Then
       GetRangeColor = "Only work for single cell"
    End If
    Select Case xRg.Interior.Color
    Case RGB(255, 0, 0)
        GetRangeColor = "Play"
    Case RGB(0, 255, 0)
        GetRangeColor = "Stop"
    Case Else
      GetRangeColor = "Neither"
    End Select
End Function

在代码中 RGB（255，0，0） 和 RGB（0，255，0） 颜色索引，您可以根据需要更改它们。更多颜色索引，请参考本网站： http://dmcritchie.mvps.org/excel/colors.html

3.保存此代码，然后关闭窗口并返回工作表。然后在单元格类型公式中

= GetRangeColor（A1）

媒体输入键，然后将填充手柄拖到单元格上以填充此公式。

A1是要根据其填充颜色填充文本的单元格。
doc基于颜色11填充文本