VBATips

MsgBoxフォーカス初期位置(はい/いいえ/キャンセル)設定をする【ExcelVBA】

ユーザーに選択肢を与えたい場合、MsgBoxで処理分岐する場合があります。
その際、初期位置(デフォルト位置)を「はい」「いいえ」「キャンセル」のどこにするか設定可能です。

MsgBoxフォーカス初期位置(はい/いいえ/キャンセル)設定するコード

Public Sub sample()

    '■設定しなければ、「はい」が選択
    Call MsgBox("初期位置「はい」", vbYesNoCancel)
    
    '■設定すれば、好きな位置に設定可能(YesNoCancel)
    Call MsgBox("初期位置「はい」", vbYesNoCancel + vbDefaultButton1)
    Call MsgBox("初期位置「いいえ」", vbYesNoCancel + vbDefaultButton2)
    Call MsgBox("初期位置「キャンセル」", vbYesNoCancel + vbDefaultButton3)

    '■設定すれば、好きな位置に設定可能(YesNo)
    Call MsgBox("初期位置「はい」", vbYesNo + vbDefaultButton1)
    Call MsgBox("初期位置「いいえ」", vbYesNo + vbDefaultButton2)

End Sub

 

関連記事

コメント

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