2017-10-27 18 views
0

を終了するには、誤って、必要性を設定し、入力ボックスに設定されて無限ループVBA InputBox関数の基準は、私が馬鹿だマクロ

InputBoxx: 
    Again = InputBox("Question?" & vbLf & "1) Answer 1" & vbLf& vbLf & "2) Answer 2" & vbLf & "3) Answer 3" & vbLf & vbLf & "Please Enter the number that corresponds to your selection") 

If Again <> 1 Or Again <> 2 Or Again <> 3 Then MsgBox "Hey now, that wasn't one of the choices....", vbCritical: GoTo InputBoxx: 

Excelを閉じずにループを終了する方法はありますか?私はエスケープ、キャンセルなどを押した。

+1

このようなループに頼るのではなく、ユーザーが選択できる内容を制限するUserformを使用するほうがはるかに優れています。 – braX

+0

また、 'vbLf'文字を連結する代わりに' vbNewLine'を使うことを検討してください。 Windows版の場合、改行は 'vbCr + vbLf'です。 –

答えて

6

実行を中断するには、Ctrl + Breakキーを押す必要があります。

関連する問題