Почему компилятор выдает ошибку Несоответствие типов

Question

Следующая функция должна быть выполнена с использованием этого фрагмента кода.

    ' If [b9] = "#N/A" Then
    ' If Range("B9").Value = "#N/A" Then
    ' If Range("B9") = #N/A Then
    Range("A9").Select
    With Selection.Interior
    .Color = -16776961
    End With

Если значение в ячейке B9 имеет # N / A, тогда ячейка A9 должна быть красного цвета.

Первые три строки - это синтаксисы, которые я пробовал. Ни один из них, кажется, не работает, и появляется ошибка Type Mismatch.

Answer 1

Немного короче, чем ответ BigBen:

If [ISNA(B9)] Then...

Answer 2

Попробуйте,

If WorksheetFunction.IsNA(Range("B9").Value) Then
    Range("A9").Interior.Color = -16776961
End If