IF/Then基于单元格颜色的VBA代码。不是价值

Sub CheckCellColor()
    Dim cell As Range
    
    For Each cell In Selection
        If cell.Interior.Color = RGB(255, 0, 0) Then
            ' 如果单元格颜色为红色，则执行某些操作
            ' 例如：cell.Value = "红色"
        ElseIf cell.Interior.Color = RGB(0, 255, 0) Then
            ' 如果单元格颜色为绿色，则执行某些操作
            ' 例如：cell.Value = "绿色"
        Else
            ' 如果单元格颜色不是红色或绿色，则执行其他操作
            ' 例如：cell.Value = "其他颜色"
        End If
    Next cell
End Sub