尽管在此站点上并不经常使用,但是您可能会遇到想要使用Excel VBA中的“直到循环”的情况。重复执行“直到”和“循环”之间的代码,直到“直到”之后的部分为真。
在您的工作表上放置一个命令按钮,并添加以下代码行:
暗淡我作为整数
I = 1
待办事项 直到 I> 6个
细胞(I,1)。价值= 20
I = I + 1
循环
I = 1
待办事项 直到 I> 6个
细胞(I,1)。价值= 20
I = I + 1
循环
单击工作表上的命令按钮时的结果:
说明:在i大于6之前,Excel VBA将值20放入行i与列1的交点处的单元格中,并将i递增1。结果,值20将被放置到列A中六次(不是七,因为当我等于7时Excel VBA停止。