1. ホーム
  2. excel

[解決済み] While...Wendループからの脱却

2022-09-05 03:16:48

質問

VBAのWhile...Wendループを使用しています。

Dim count as Integer

While True
    count=count+1

    If count = 10 Then
        ''What should be the statement to break the While...Wend loop? 
        ''Break or Exit While not working
    EndIf
Wend

While count<=10...Wend のような条件は使いたくありません。

どのように解決するのですか?

A While / Wend ループを早期に終了させるためには GOTO を付けるか、外側のブロック ( Exit sub / function または他の実行可能なループ)

に変更する。 Do ループに変更します。

Do While True
    count = count + 1

    If count = 10 Then
        Exit Do
    End If
Loop

または設定した回数だけループさせる場合。

for count = 1 to 10
   msgbox count
next

( Exit For は早期終了のために上記で使用することができます)