Application.WorkbookBeforeSave Event

Excel Developer Reference

Occurs before any open workbook is saved.

Syntax

expression.WorkbookBeforeSave(Wb, SaveAsUI, Cancel)

expression A variable that represents an Application object.

Parameters

Name Required/Optional Data Type Description
Wb Required Workbook The workbook.
SaveAsUI Required Boolean True if the Save As dialog box will be displayed.
Cancel Required Boolean False when the event occurs. If the event procedure sets this argument to True, the workbook isn't saved when the procedure is finished.

Return Value
Nothing

Example

This example prompts the user for a yes or no response before saving any workbook.

Visual Basic for Applications
  Private Sub App_WorkbookBeforeSave(ByVal Wb As Workbook, _
        ByVal SaveAsUI As Boolean, Cancel as Boolean)
    a = MsgBox("Do you really want to save the workbook?", vbYesNo)
    If a = vbNo Then Cancel = True
End Sub

See Also