共用方式為


Workbook.BeforeSave 事件 (2007 系統)

更新:2007 年 11 月

在儲存活頁簿前發生。

命名空間:  Microsoft.Office.Tools.Excel
組件:  Microsoft.Office.Tools.Excel.v9.0 (在 Microsoft.Office.Tools.Excel.v9.0.dll 中)

語法

Public Event BeforeSave As WorkbookEvents_BeforeSaveEventHandler

Dim instance As Workbook
Dim handler As WorkbookEvents_BeforeSaveEventHandler

AddHandler instance.BeforeSave, handler
public event WorkbookEvents_BeforeSaveEventHandler BeforeSave

範例

下列程式碼範例會示範 BeforeSave 事件的處理常式。這個事件處理常式會提示使用者繼續或取消儲存作業。如果使用者取消儲存作業,則 WorkbookEvents_BeforeSaveEventHandler 事件處理常式的 Cancel 參數設為 true,因此 Microsoft Office Excel 不會儲存活頁簿。

這是示範文件層級自訂的範例。

Sub ThisWorkbook_BeforeSave(ByVal SaveAsUI As Boolean, _
    ByRef Cancel As Boolean) Handles Me.BeforeSave

    If DialogResult.No = MessageBox.Show("Are you sure " & _
        "you want to save the workbook?", "Sample", _
        MessageBoxButtons.YesNo) Then
        Cancel = True
        MessageBox.Show("Save is canceled.")
    End If
End Sub
private void WorkbookBeforeSave()
{
    this.BeforeSave +=
        new Excel.WorkbookEvents_BeforeSaveEventHandler(
        ThisWorkbook_BeforeSave);
}

void ThisWorkbook_BeforeSave(bool SaveAsUI, ref bool Cancel)
{
    if (DialogResult.No == MessageBox.Show("Are you sure you want to " +
        "save the workbook?", "Example", MessageBoxButtons.YesNo))
    {
        Cancel = true;
        MessageBox.Show("Save is canceled.");
    }
}

使用權限

請參閱

參考

Workbook 類別

Workbook 成員

Microsoft.Office.Tools.Excel 命名空間