エクセルマクロVBA:基本構文
エクセルのちょっとしたテクニックを紹介します。
Do〜Loop構文は、指定した条件に合致している間、または、条件に合致しない間処理を繰り返すというものです。
・構文
指定した条件に合致している間処理を繰り返す場合、
1.Do While 条件文
処理
Loop
または、
2.Do
処理
Loop While 条件文
指定した条件に合致しない間処理を繰り返す場合、
1.Do Until 条件文
処理
Loop
または、
2.Do
処理
Loop Until 条件文
1と2の違いというと、1は条件に合わなければ処理は行いませんが、2では最低1回は処理を行います。どちらを使うかはどのような処理をさせるかによるので、使い分けてください。
以下のサンプルコードを試してみてくださいね。
'***************************************
'ループ処理テスト
'***************************************
Sub Test11()
Dim i As Integer
Dim Num As Integer
i = 0
Num = 1
Do Until Num > 100
Num = Num * 3
i = i + 1
Loop
MsgBox "ループ回数:" & i & "回"
End Sub
Do〜Loop構文は、指定した条件に合致している間、または、条件に合致しない間処理を繰り返すというものです。
・構文
指定した条件に合致している間処理を繰り返す場合、
1.Do While 条件文
処理
Loop
または、
2.Do
処理
Loop While 条件文
指定した条件に合致しない間処理を繰り返す場合、
1.Do Until 条件文
処理
Loop
または、
2.Do
処理
Loop Until 条件文
1と2の違いというと、1は条件に合わなければ処理は行いませんが、2では最低1回は処理を行います。どちらを使うかはどのような処理をさせるかによるので、使い分けてください。
以下のサンプルコードを試してみてくださいね。
'***************************************
'ループ処理テスト
'***************************************
Sub Test11()
Dim i As Integer
Dim Num As Integer
i = 0
Num = 1
Do Until Num > 100
Num = Num * 3
i = i + 1
Loop
MsgBox "ループ回数:" & i & "回"
End Sub
トラックバックURL
この記事にコメントする