Всем привет! Помогите пожалуйста!!! Нужно отфильтровать ноль

Private Sub VsfParam_LeaveCell()
If VsfParam.Col > 0 And VsfParam.Col < 4 Then
If Len(VsfParam.Text) > 0 Then
If DetectZeroNumber(VsfParam.Text)= True _ ' моя функция возвращает
Then True и выдает сообщение
если в ячейке введен ноль
VsfParam.Text = " " 'очищает ячейку где был ноль
VsfParam.EditCell 'установкам курсорав ячейку где был ноль
Exit Sub
End If
End If
End If
End Sub

Собственно вопрос: Почему если в ту же ячейку в которой был ноль а теперь мигает курсор ввести опять ноль и с нее перейти на другую второй раз он уже не отфильтровывается ??? Можетя не в том событии написал? Или несколько событий необходимо связывать?

Сапсибо, Marvan второй раз помогаете...
Я конечно пробовал с CellChanged только курсор уходит в другую ячейку,а мне нужно вернуть его в ту ячейку где ноль был; чтобы пользователь ввел в нее другое значение (ненулевое ). Наверно это проще простого-вернуть курсор, но не получается. Возможно вы знаете как???

Спасибо большое всем отозвавшимся, осоьенно Marvan