vba Do Until

　　一、Do Until语法

　　第一种语法：

　　Do Until 条件式

　　条件式为True为止，循环处理

　　Loop

　　第二种语法：

　　Do

　　条件式为True为止，循环处理

　　Loop Until 条件式

　　二、Do Until的例子

　　下面分别针对如上的两种语法，给出相应的例子：

　　如下代码功能为：'单元格A1～A10内，填入1～10

　　i = 1

　　Do Until i = 11

　　Worksheets("Sheet1").Cells(i, 1).Value = i

　　i = i + 1

　　Loop

　　如下代码的功能为：'单元格A1～A10内，填入1～10

　　i = 10

　　Do

　　Worksheets("Sheet1").Cells(i, 1).Value = i

　　i = i + 1

　　Loop Until i = 11