Не работает условие IF - VBA

Узнай цену своей работы

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

Помогите, плиииз, советом: я применила код к своей базе данных. он мне ищет номера торгов. Но почему-то в определённый момент затирает результаты поиска первых номеров. то есть сначала он вставляет первый номер (куда надо), потом находит второй (записывает его куда надо), а первый при этом удаляет. Хотя при поиске номера ячеек не пересекаются. Подозреваю, что пишу в If что-то не так.

Решение задачи: «Не работает условие IF»

textual
Листинг программы
If dptArr(j, 7) = 1 And dptArr(j, 8) = 0 Then .Cells(i + 1, 7).Value = dpt.Cells(j + 1, 2).Value 'номер торгов

Оцени полезность:

10   голосов , оценка 4 из 5