Application.WorkbookBeforeSave Event (Excel)
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 |
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.
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