DoAlert Method

Microsoft Office Visual Basic

expression.DoAlert(bstrAlertTitle, bstrAlertText, alb, alc, ald, alq, varfSysAlert)

expression    Required. An expression that returns one of the objects in the Applies To list.

bstrAlertTitle Required String. Sets the title of the alert.

bstrAlertText   Required String. Sets the text of the alert.

alb   Required MsoAlertButtonType. Determines which buttons are displayed on the alert.

MsoAlertButtonType can be one of these MsoAlertButtonType constants.
msoAlertButtonAbortRetryIgnore
msoAlertButtonOK
msoAlertButtonOKCancel
msoAlertButtonRetryCancel
msoAlertButtonYesAllNoCancel Only use this when the varfSysAlert argument is set to False.
msoAlertButtonYesNo
msoAlertButtonYesNoCancel

alc   Required MsoAlertIconType. Determines the icon that is displayed on the alert.

MsoAlertIconType can be one of these MsoAlertIconType constants.
msoAlertIconCritical
msoAlertIconInfo
msoAlertIconNoIcon
msoAlertIconQuery
msoAlertIconWarning

ald   Required MsoAlertDefaultType. Determines which button is set as the default button of the alert. If this argument is set to a value greater than the number of buttons, an error is returned.

MsoAlertDefaultType can be one of these MsoAlertDefaultType constants.
msoAlertDefaultFifth
msoAlertDefaultFirst
msoAlertDefaultFourth
msoAlertDefaultSecond
msoAlertDefaultThird

alq   Required MsoAlertCancelType. Always set this to msoAlertCancelDefault. Any other setting may return an error.

MsoAlertCancelType can be one of these MsoAlertCancelType constants.
msoAlertCancelDefault
msoAlertCancelFifth
msoAlertCancelFirst
msoAlertCancelFourth
msoAlertCancelSecond
msoAlertCancelThird

varfSysAlert   Required Boolean. True if the alert is displayed in a message box or False if the alert is displayed through the Office Assistant.

Remarks

The return values of the DoAlert method corresponds to the values of the vbMsgBoxResult enumerated type (for example, vbYes, vbNo, or vbCancel). In addition to these values, the following values may also be returned:

  • "Yes to all" = 8
  • "Try again" = 10
  • "Continue" = 11

Example

The following example displays an alert through the Office Assistant and displays a message box indicating which button the user pressed. If the assistant is disabled, the alert is displayed in a normal message box.

Sub AssistantAlert()
    With Application.Assistant
        Select Case _
            .DoAlert( _
            "Test", _
            "Click a button.", _
            msoAlertButtonYesAllNoCancel, _
            msoAlertIconCritical, _
            msoAlertDefaultSecond, _
            msoAlertCancelFirst, _
            False)

            Case vbYes: MsgBox "The user clicked Yes."
            Case vbNo: MsgBox "The user clicked No."
            Case vbCancel: MsgBox "The user clicked Cancel."
            Case 8: MsgBox "The user clicked Yes To All" 'This is the return value for YesToAll
            Case Else
        End Select
    End With
End Sub