會在儲存任一開啟的活頁簿之前發生。
注意事項
在 Office 365 中，Excel 支援自動儲存，可自動持續儲存使用者的編輯內容。 如需詳細資訊，請參閱 自動儲存如何影響增益集和巨集 ，以確保在啟用自動儲存時，執行程式碼以回應 WorkbookBeforeSave 事件。
語法
表達。WorkbookBeforeSave (Wb、SaveAsUI、取消)
expression 代表 Application 物件的變數。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| Wb | 必要 | 活頁簿 | 活頁簿。 |
| SaveAsUI | 必要 | 布林值 | True ，如果由於需要儲存在活頁簿中的變更而顯示 [另存新檔] 對話方塊。 |
| Cancel | 必要 | 布林值 | False 事件發生時。 如果事件程序將這個引數設為 True，則該程序結束時，並不會儲存活頁簿。 |
傳回值
無
範例
本範例會在儲存任何活頁簿前，提示使用者是否儲存活頁簿。
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
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。