VBATips

MsgBox「はい」「いいえ」の条件分岐をする【ExcelVBA】

ユーザーに選択肢を与えたい場合、MsgBoxで処理分岐する場合があります。
毎度毎度同じコード記載するのも大変なので、コピペ用に記事にしました。

MsgBox「はい」「いいえ」の条件分岐をするコード

Public Sub sample()

    '■Yes or Noの場合
    If MsgBox("処理を開始しますか?", vbYesNo) = vbYes Then
        Debug.Print True
    Else
        Debug.Print False
    End If
    
    '■Yesの場合処理を終了する
    If MsgBox("終了しますか?", vbYesNo) = vbYes Then Exit Sub
    
    '■No の場合処理を終了する
    If MsgBox("開始しますか?", vbYesNo) = vbNo Then Exit Sub

End Sub

 

関連記事

コメント

タイトルとURLをコピーしました