VBA Do UntilループDo Until Loopは、ある条件を満たすまでループを繰り返します。構文は基本的にDo Whileループと同じです。Do Until 条件[任意の処理] LoopDo Whileループと同様、条件の位置はループの最初でも最後でもかまいません。
.繰り返し処理(DoLoop) Do～の構文 Do [While | Until} condition] [statements [ExitDo] [statements Loop Do [] [Exit Do] [statements] Loop[{While | Until} condition] condition省略可能です。 真(True または偽 (False) を評価する数式、あるいは文字列式を指定します。
Do Until rs.EOF Debug.Print rs!品名 & ", " & rs!単価 rs.MoveNext Loop このコードでは、レコードが末尾まで行くと、rs.EOFがTrueになるので、それまでの間ループを繰り返します。 なお、EOFはEnd Of Fileのことです(また、BOFはBeginning Of Fileのことです)。