i1に戻ったときの、i1,i2,i3の値が気になるが

Dim f as boolean
f = True

For i1=…
　’ここにi1の処理（※）
　　For i2=…
　　　If f Then
　　　’ここにi2の処理（※）
　　　　For i3=…
　　　　　’ここにi3の処理
　　　　　If （i2,i3である値が０になったとき） Then
　　　　　　f = False
　　　　　End If
　　　　Next i3
　　　End If
　　Next i2
Next i1

どこかでf = Trueをいれないといけないけどね