Exit Doで二つのloopを抜けるには？

質問

Do
Do
For Each
If　値 = "" Then
Exit Do
End If
Next
Loop Until 条件１
Loop Until 条件２

のようなネストをした場合、Exit Doでloopを抜ける時、条件１と条件２のどちらに移動するのですか？

もし条件１に移動する場合、条件２を抜けたいのならどうすればいいのでしょうか？

Exit Do　Do
みたいな事がしたいです。

回答No.2

chayamati · ベストアンサー

自信ないですが

Do
　Do
　　For Each
　　　If　値 = "" Then
　　　　　Exit Do
　　　End If
　　Next
　Loop Until 条件１
　Exit Do
Loop Until 条件２

※構文の一部だけですね
　For Eachの後 文が続きますね

お礼

どうもありがとうございました。

回答No.3

keithin

単に制御構造だけの問題と捉えれば、直接抜けてしまうだけです。別に本物のプログラマを目指してるわけじゃなければ。

　do
　do
　　for each
　　if 条件 then goto OUTGO
　　next
　loop until
　loop until
OUTGO:
　msgbox "DONE"

またキチンと制御構造を閉じたいなら
do
do
for each
if 値 = "" then exit for
next
loop until 条件１ or 値 = ""
loop until 条件２ or 値 = ""
といった格好かとも思います。

お礼

どうもありがとうございました。

回答No.1

kybo

それでは、Do ～　Loopの一番内側のみ抜けます。
なので、両方抜けるには、

Do
Do
For Each
If　値 = "" Then
Exit Do
End If
Next
Loop Until 条件１

'★Exit Doでここに移動します。

Loop Until 条件２ Or 値 = ""　’★ここにも抜ける条件を入れておきます。

もしこれだけのプロシージャであれば、 Exit Subで抜けると終了可能です。

お礼

どうもありがとうございました。