Как найти цвет фона ячейки

Question

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

Я хочу, чтобы проверить цвет фона конкретной ячейки ...

код

if flexgrid1.TextMatrix(1, 2).CellBackColor = vbCyan then 
msgbox vbcyan 
else 
msgbox vbwhite 
End if 

Приведенный выше код показывает ошибку как " Invalid Qualifier»

Другой путь ....

if flexgrid1.row = 1 and flexgrid1.col = 2 and .CellBackColor = vbCyan then 
    msgbox vbcyan 
    else 
    msgbox vbwhite 
    End if 

Приведенный выше код не отображается окно сообщения

Как решить эту проблему ...

Что неправильно в моем коде.

Answer 1

.CellBackColor получает/устанавливает цвет для текущего .Row/.Col, поэтому, прежде чем спрашивать, вы должны установить .Row/.Col на тот, который вы смотрите:

With flexgrid1 
    .Row = 1 
    .Col = 2 
    If .CellBackColor = vbCyan Then 
     msgbox vbCyan 
    Else 
     msgbox vbWhite 
    End If 
End With 

Answer 2

Ваши заявления MsgBox кошерным ? msgbox принимает строку в качестве аргумента.

msgbox "colour is Cyan"