VBA如何终止do until循环

Question

在执行do until循环时，如果后面的判断条件不为True时，如果中断这个循环
在执行do until循环时，如果后面的判断条件不为True时，如何中断这个循环

Answer 1

这里举个简单的例子
Sub aa()
Do
x = x + 1
Loop Until x <> 1
MsgBox x
End Sub

意思是每一次循环x的值+1，当x<>1的时候退出循环
实际上就只有一个1，所以循环一次就退出了
你根据你的实际情况修改即可。
Sub aa()
Do
x = x + 1
Loop Until x > 10
MsgBox x
End Sub
同理，这是当x>10的时候退出循环追问

比如
Do Until X>10 And Y10还是判断 X>10 And Y<10

追答

两个都判断，因为你用的是and
但你的Y始终没有值，所以实际上只判断x>10

追问

这个是程序的一部分，里面那层do循环 会一直执行到a=1,貌似a>10并没有起作用

追答

你是等于10，大于10当然就不起作用了

Answer 2

可以设个变量在循环中累加，当它累加到指定值时，就中断循环。指定值一定要大于你的判断条件可能的循环次数。

Answer 3

eixt do追问

如果

Do Until X>10

Do Until Y>10

。。。。。。
Exit Do

LOOP

LOOP
这时是退出里面的Do循环还是外面那层的

追答

里边那层!