EXCEL VBA - アイコンの種類と定数

アイコンの種類と定数

VBA では、どのようなアイコンをダイアログに表示するかは、定数として定義されています。アイコンの種類を指定する場合は、定義済みの定数、または値を指定します。

ダイアログにアイコンを表示する場合、ボタンの定数に加算して MsgBox 関数の引数として指定します。

Dim ans As Integer
ans = MsgBox("メッセージ", vbOKCancel + vbCritical, "タイトル")

If ans = vbOK Then
    Debug.Print ("「OK」が押されました")
ElseIf ans = vbCancel Then
    Debug.Print ("「キャンセル」が押されました")
End If

Dim ans As Integer
ans = MsgBox("メッセージ", vbOKCancel + vbQuestion, "タイトル")

If ans = vbOK Then
    Debug.Print ("「OK」が押されました")
ElseIf ans = vbCancel Then
    Debug.Print ("「キャンセル」が押されました")
End If

Dim ans As Integer
ans = MsgBox("メッセージ", vbOKCancel + vbExclamation, "タイトル")

If ans = vbOK Then
    Debug.Print ("「OK」が押されました")
ElseIf ans = vbCancel Then
    Debug.Print ("「キャンセル」が押されました")
End If

Dim ans As Integer
ans = MsgBox("メッセージ", vbOKCancel + vbInformation, "タイトル")

If ans = vbOK Then
    Debug.Print ("「OK」が押されました")
ElseIf ans = vbCancel Then
    Debug.Print ("「キャンセル」が押されました")
End If