Excel-VB читает цвет ячейки - PullRequest
       3

Excel-VB читает цвет ячейки

1 голос
/ 11 октября 2019

Мне интересно, почему мой код неправильно читает значение ячейки. Дело в том, если Excel помечает ячейку красным и когда пользователь нажимает кнопку проверки. макрос выдает сообщение в зависимости от цвета ячейки.

В данный момент я проверяю это на «c4», но если я ставлю его на красный (255,0,0), он не читается как «красный». "

  Sub Validate()
        Dim xRng As Range
        Dim ws As Worksheet
        Set ws = Sheets("TEMPLATE")
        Set xRng = Range("A2:N1000")

        If ws.Range("C4").Interior.Color = RGB(255, 0, 0) Then
            MsgBox "Found some errors, please review your template", vbOKOnly + vbCritical, "Validation"
        Else
            MsgBox "No direct errors found!", vbOKOnly + vbQuestion, "Validation"
        End If

    End Sub

1 Ответ

2 голосов
/ 11 октября 2019

Если ячейка была окрашена условным форматом, вы должны проверить это следующим образом

If ws.Range("C4").DisplayFormat.Interior.Color = RGB(255, 0, 0) Then
    ' Your code here
Else
    ' Your code here
End If
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...