Ошибка при отсутствии данных - VBA

Формулировка задачи:

Здравствуйте! В коде добавила условие, всё прекрасно работает при наличии данных, но при отсутствии их (т.е.поле пустое) выдается системная ошибка...Пожалуйста подскажите как это поправить. Вот тот самый кусочек кода, который добавила

If IzmKol = False Then
DostKol.Visible = False
Else
DostKol.Visible = True
End If

Решение задачи: «Ошибка при отсутствии данных»

textual
                            Листинг программы 
                        

                            On Error Resume Next
If IzmKol.Value = "" Then
MsgBox "Отсутствуют данные!"
Exit Sub
End If
If IzmKol = False Then
DostKol.Visible = False
Else
DostKol.Visible = True
End If
                        