Разорвать цикл For

Question

Как выйти из ITERATION For в l oop, если условие выполнено, а затем go к следующему. Лист содержит несколько тысяч строк, и такой разрыв в l oop ускорит код. Это не выход из всего l oop только пропуск одной итерации .

For i = 1 To LastRow2
    For j = 1 To LastRow3
        If ark2.Cells(j, "F") = ark3.Cells(i, "J") Then
            GoTo NextIteration
        Else
            LastRow2 = ark2.Cells(Rows.Count, 1).End(xlUp).Row
            ark2.Rows(LastRow2 + 1) = ark3.Rows(i)
        End If

    Next j
Next i

Answer 1

Добавить дополнительный чек для внешнего FOR l oop,

For i = 1 To LastRow2
  For j = 1 To LastRow3
    If ark2.Cells(j, "F") = ark3.Cells(i, "J") Then
        GoTo NextIteration = TRUE
    Else
        LastRow2 = ark2.Cells(Rows.Count, 1).End(xlUp).Row
        ark2.Rows(LastRow2 + 1) = ark3.Rows(i)
    End If

  Next j
   IF NextIteration = TRUE Then
    GoTo NextIteration (i.e break)
Next i