ネストされたループ内からスキップする

Question

私がしようとしているのは、値が2つの列の値の間にあるかどうかをチェックし、値が内部にあれば "1"をセルに入れ、 "0" alredyは、次のjと続行してみてください。私はこれには単純な解決策があるが、援助は高く評価されることを知っおかげ

For i = 1 To ll 
    For j = 1 To t 
    If Cells(j + 1, 12).Value >= Cells(i + 1, 9).Value And Cells(j + 1, 12).Value< Cells(i + 1, 10).Value Then 
Cells(j + 1, 13).Value = 1 
Next j 
    Else 
    Cells(j + 1, 13).Value = 0 
     Next i 
      End If 

`

Answer 1

あなたがExit For

For i = 1 To ll 
    For j = 1 To t 
     If Cells(j + 1, 12).Value >= Cells(i + 1, 9).Value And Cells(j + 1, 12).Value < Cells(i + 1, 10).Value Then 
      Cells(j + 1, 13).Value = 1 
      Exit For 
     Else 
      Cells(j + 1, 13).Value = 0 
     End If 
    Next j 
Next i 

---

をしたいしかし、私はあなたがループを反転させる必要があると思います。私は11

For j = 1 To t 
    For i = 1 To 11 
     If Cells(j + 1, 12).Value >= Cells(i + 1, 9).Value And Cells(j + 1, 12).Value < Cells(i + 1, 10).Value Then 
      Cells(j + 1, 13).Value = 1 
      Exit For 
     Else 
      Cells(j + 1, 13).Value = 0 
     End If 
    Next i 
Next j 

Answer 2

を=ときに他のforループとそうでない場合、最終的に表現される唯一の値は、あなたがネストしているされています。これはあなたのコードに問題があります。

For i = 1 To ll 
    For j = 1 To t 
     If (Cells(j + 1, 12).Value >= Cells(i + 1, 9).Value And Cells(j + 1, 12).Value< Cells(i + 1, 10).Value) Then 
      Cells(j + 1, 13).Value = 1 
     Else 
      Cells(j + 1, 13).Value = 0 
     End If 
    Next j 
Next i