Страницы: 1
RSS
Оператор "exit for"
 
Друзья!  
С наступающим всех!  
 
Имеем:  
1. Лист excel с данными, которые необходимо сравнить между собой  
2. Макрос для решения этой задачи.  
 
Вопрос: в макросе не работает команда "exit for", т.е. после того как условие выполнено, цикл продолжается. В чем я ошибся?  
 
Sub Данные()  
 
For a = 1 To 3  
   For b = 2 To 5  
       Cells(b, 5) = 1  
       If Cells(a, 1) = Cells(b, 6) And Cells(a, 2) = Cells(b, 7) And Cells(a, 3) = Cells(b, 8) Then  
           Cells(a, 4) = "Да"  
           Exit For  
       End If  
   Next b  
Next a  
 
End Sub
 
Тысяча извинений.  
Он работает...........  
Проверка неудачная - новый цикл а маскирует остановку предыдущего цикла b.  
Сорри....  
 
Еще раз с наступающим новым годом!!!
Страницы: 1
Наверх