ステートメント

ステートメント Do~Loopステートメント

投稿日:2021年4月27日 更新日:

ステートメント

ステートメント Do~Loopステートメント

Do Loopステートメントは繰り返し処理の条件を指定するステートメントです。

 

以下のように使います。

Do While または Until 条件

処理

Loop

 

Whileは、条件を満たす間処理を実行します。

Untilは、条件を満たす迄処理を実行します。

上記表があります。

Untilを条件とします。

E列のセルが空白ではなくなるまで処理を繰り返します。

Sub test()
Dim i
i = 3
Do Until Cells(i, 5).Value <> “”
Cells(i, 5).Value = Cells(i, 3) * Cells(i, 4)
i = i + 1
Loop
End Sub

 

合計欄に計算された数値がかえりました。

 

次にWhileを条件とします。

E列のセルが空白の間、処理を繰り返します。

Sub test()
Dim i
i = 3
Do While Cells(i, 5).Value = “”
Cells(i, 5).Value = Cells(i, 3) * Cells(i, 4)
i = i + 1
Loop
End Sub

 

合計欄に計算された数値がかえりました。






派遣社員ランキング

Microsoft Officeランキング
にほんブログ村 Windows





 

-ステートメント
-, , , , , , , , , , ,

執筆者:

関連記事

ステートメント Killステートメント

ステートメント RmDirステートメント

ステートメント ステートメント RmDirステートメント ステートメントは、宣言や命令という意味です。 今回はRmDirステートメントです。 フォルダを削除するステートメントです。 上記のように、Rm …

ステートメント Nameステートメント

ステートメント ステートメント Nameステートメント ステートメントは、宣言や命令という意味です。 今回はNameステートメントです。 ファイル名フォルダ名を変更するステートメントです。 まずはファ …

ステートメント Beepステートメント

ステートメント For~NextステートメントStepでカウンターに加算していきます




人気記事




  • 487,150 アクセス
%d人のブロガーが「いいね」をつけました。