Excel VBA双击单元格代码问题：浅玫瑰色条件格式单元格不触发提示

核心问题分析 #

你遇到的浅玫瑰色单元格无法触发"Invalid"提示的问题，大概率出自条件格式颜色的判断逻辑或RGB值匹配精度，以下是具体原因和修复方案：

1. 误用Interior.Color判断条件格式颜色 #

条件格式设置的填充色不会修改单元格的Interior.Color属性（该属性对应手动设置的填充色），实际显示的颜色需通过DisplayFormat.Color获取。如果你的代码中对浅玫瑰色单元格用了Interior.Color判断，而另外两个颜色是手动填充（非条件格式），就会出现只有浅玫瑰色不触发提示的情况。

错误写法示例：

' 错误：无法识别条件格式设置的浅玫瑰色
If Target.Interior.Color = RGB(242, 228, 214) Then
    MsgBox "Invalid"
    Exit Sub
End If

修复后的正确写法：

' 正确：获取条件格式实际显示的颜色
If Target.DisplayFormat.Color = RGB(242, 228, 214) Then
    MsgBox "Invalid"
    Exit Sub
End If

2. RGB值存在细微偏差 #

条件格式中选择颜色时，系统可能对RGB值进行取整处理，导致实际显示颜色的十进制值和你代码中RGB(242,228,214)的转换值不一致。可以先获取目标单元格的实际颜色值：

测试获取颜色值的代码：

Sub GetActualDisplayColor()
    MsgBox ActiveCell.DisplayFormat.Color
End Sub

运行后将弹出的十进制数值替换到判断条件中，例如：

' 用实际获取的颜色值替换，确保匹配
If Target.DisplayFormat.Color = 14985238 Then
    MsgBox "Invalid"
    Exit Sub
End If

3. 逻辑运算符使用错误 #

如果多个颜色判断用了And而非Or，会导致条件永远无法成立（一个单元格不可能同时是三种颜色），可能间接导致浅玫瑰色的判断被忽略。

错误写法示例：

' 错误：逻辑运算符错误，条件永远不成立
If Target.DisplayFormat.Color = RGB(208,206,206) And _
   Target.DisplayFormat.Color = RGB(189,215,238) And _
   Target.DisplayFormat.Color = RGB(242,228,214) Then
    MsgBox "Invalid"
    Exit Sub
End If

修复后的正确逻辑：

' 正确：用Or连接多个无效颜色条件
Dim gray As Long, blue As Long, rose As Long
gray = RGB(208, 206, 206)
blue = RGB(189, 215, 238)
rose = RGB(242, 228, 214)

If Target.DisplayFormat.Color = gray Or _
   Target.DisplayFormat.Color = blue Or _
   Target.DisplayFormat.Color = rose Then
    MsgBox "Invalid"
    Exit Sub
End If

快速排查步骤 #

1. 优先检查代码中是否用DisplayFormat.Color替代了Interior.Color来判断条件格式颜色。
2. 运行测试代码获取浅玫瑰色单元格的实际显示颜色值，对比代码中的RGB转换值是否一致。
3. 确认多个颜色判断的逻辑运算符为Or而非And。

内容的提问来源于stack exchange，提问作者Daniel