【VBA】実行時に質問して「はい」か「いいえ」か選ばせる

VBAでボタンなどを使用してコードを実行する際に、間違えて押しちゃったってことあると思うんです。

そこで、実行時に「はい」か「いいえ」を選ばせるMsgBoxを出現させて、間違えて押しても実行を取り消せるようにすると親切かなと思いますん。

説明付きコード

Dim IntroQ As String
IntroQ = msgbox("処理を実行しますか", vbyesno + vbquestion)　　' 「""」の間に質問したい文章を入れる

If IntroQ = vbyes Then
    ' ここに「はい」の場合の処理を記述します
Else
    msgbox "キャンセルされました"
End If

コピー用シンプルコード

Dim IntroQ As String
IntroQ = msgbox("", vbyesno + vbquestion)

If IntroQ = vbyes Then
    
Else
    msgbox "キャンセルされました"
End If

このコードはよーく使うのでスニペット登録してますん。

ではまたー