打开VBA编辑器并添加新模块。通过转到Developer
选项卡并单击Visual Basic
来执行此操作。如果您在功能区上没有开发人员选项卡,则需要添加它(快速进行Google搜索)。打开VBA编辑器后,右键单击左侧有工作簿名称的VBA项目并插入模块。
将以下代码放入新模块中:
Function IsRed(rng As Range) As Integer
IsRed = (rng.Interior.Color = vbRed) * -1
End Function
然后你可以使用公式=IsRed(A1)
来确定A1
是否有红色背景
注意:这使用标准颜色中的默认红色
您可以使用自动过滤器在没有VBA的情况下手动实现: