Do Loop ステートメント
1 Cells(cnt,1)の値が「""」になったらLoopから抜ける。
ただし、Cell(1,1)が「""」なら一度もLoopしない。
cnt = 1
Do Until Cells(cnt, 1).Value = ""
cnt = cnt + 1
Loop
2 Cells(cnt,1)の値が「""」でない間はLoopする。
ただし、Cell(1,1)が「""」なら一度もLoopしない。
cnt = 1
Do While Cells(cnt, 1).Value <> ""
cnt = cnt + 1
Loop
3 Cells(cnt,1)の値が「""」になったらLoopから抜ける。
ただし、Cell(1,1)が「""」でも1回Loopする。
cnt = 1
Do
cnt = cnt + 1
Loop Until Cells(cnt, 1).Value = ""
4 Cells(cnt,1)の値が「""」でない間はLoopする。
ただし、Cell(1,1)が「""」でも1回Loopする。
cnt = 1
Do
cnt = cnt + 1
Loop Until Cells(cnt, 1).Value = ""
ただし、Cell(1,1)が「""」なら一度もLoopしない。
cnt = 1
Do Until Cells(cnt, 1).Value = ""
cnt = cnt + 1
Loop
2 Cells(cnt,1)の値が「""」でない間はLoopする。
ただし、Cell(1,1)が「""」なら一度もLoopしない。
cnt = 1
Do While Cells(cnt, 1).Value <> ""
cnt = cnt + 1
Loop
3 Cells(cnt,1)の値が「""」になったらLoopから抜ける。
ただし、Cell(1,1)が「""」でも1回Loopする。
cnt = 1
Do
cnt = cnt + 1
Loop Until Cells(cnt, 1).Value = ""
4 Cells(cnt,1)の値が「""」でない間はLoopする。
ただし、Cell(1,1)が「""」でも1回Loopする。
cnt = 1
Do
cnt = cnt + 1
Loop Until Cells(cnt, 1).Value = ""
by yuna-tip
| 2002-11-04 17:07
| 制御構造