Excel総合相談所 106

このエントリーをはてなブックマークに追加
79名無しさん@そうだ選挙にいこう
>>72
Sub a()
Dim x
x = 0
For c = 1 To 10
For d = 1 To 10
For e = 1 To 10

x = e
If e = 3 Then
Exit For
End If

Next

If e = 3 Then
Exit For

End If
Next

Next
End Sub
グローバルっぽい変数を用意しておいて、それで評価すればok
この場合は3周目に二段抜けてる(はず
ただどう考えても見難いので、素直にgoto使うかwhileで何とかしたほうがいいと思う。
>>75
全然おもしろくない。せめて最期のwは抜いて欲しい。