фон по умолчанию ячейки сетки

Question

Использование flexgrid

Я хочу проверить цвет ячейки гибкой сетки по умолчанию ...

Если цвет фона голубой, значит, приведенный ниже код работает, если цвет фона белый, то приведенный ниже код не работает

Код (Метод1)

Private Sub flex1_LeaveCell()
    With flex1
        If .CellBackColor = vbCyan Then
            .TextMatrix(.row, 34) = Val(.TextMatrix(.row, .Col)) 
        ElseIf .CellBackColor = vbWhite Then
            .TextMatrix(.row, 33) = Val(.TextMatrix(.row, .Col)) 
        End If
    End With
End Sub

Код (Метод 2)

Private Sub flex1_LeaveCell()
    With flex1
        If .CellBackColor = vbCyan Then
            .TextMatrix(.row, 34) = Val(.TextMatrix(.row, .Col)) 
        Else
            .TextMatrix(.row, 33) = Val(.TextMatrix(.row, .Col)) 
        End If
    End With
End Sub

Приведенный выше код работает только для цветного голубого, приведенный выше код не распознается белым.

Так, каков задний цвет ячейки по умолчанию для гибкой сетки.

Нужна помощь

Answer 1

Это прекрасно работает для меня.Это не работает для вас?

Private Sub flex1_LeaveCell()
    With flex1
        If .CellBackColor = vbCyan Then
            MsgBox "cyan"
        ElseIf .CellBackColor = vbWhite Or .CellBackColor = 0 Then
            MsgBox "white"
        End If
    End With
End Sub