【Day18】文系オタクのエンジニア道~ループの構文 Do Loop文~
こんにちは
安田です
今回はループ処理のDo Loopステートメントについて学習しました
Do Loopステートメントは条件が完了するまで永遠に処理を繰り返す
コードはこちら
Sub ループ() Dim n As Integer n = 1 Do While Cells(n, 1).Value = "" Cells(n, 1).Value = n n = n + 1 LoopEnd Sub
Doのあとに条件を記載します
Do While Cells(n, 1