Есть процедура:

Private Sub Кнопка40_Click()
Set db = CurrentDb
Set rst = db.OpenRecordset("tblTV", DB_OPEN_DYNASET)

If IsNull(Me![Список35].Column(9)) Then
MsgBox "Не введен признак дефекта!"
        Else
             rst.AddNew
    rst!Akt = Me![Список35].Column(8)
    rst!Date = Me![Список35].Column(2)
    rst!idKateg = Me![Список35].Column(9)
        rst!DEdit = Now()
     MsgBox "Запись успешно выполнена."
 End If
 
rst.Close
End Sub

Проблема в том, что вне зависимости от того свободна выделенная ячейка Column(9) или в ней есть запись, условие If выполняется только по ветке Else.
Т.е. если Column(9) занята - выполняются, как и должно быть, команды ветки Else, включая, MsgBox "Запись успешно выполнена", если - свободна,то вместо вывода сообщения "Не введен признак дефекта!", программа останавливается на rst!idKateg = Me![Список35].Column(9).

Помогите найти ошибку! Спасибо!

http://www.sql.ru/forum/1086710/oshibka-v-uslovii-if-then-else