會在任何開啟的文件關閉之前立即發生。
注意事項
如果您正在使用內嵌在另一份文件中的文件,則不會發生此事件。
語法
私人子 運算式 'DocumentBeforeClose** (將文件新增為文件**, 取消為布林值)
運算式 變數,代表以類別模組中的事件宣告的 Application 物件。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| Doc | 必要 | 文件 | 正在關閉的文件。 |
| Cancel | 必要 | 布林值 | False 事件發生時。 事件程序會將此引數設定為 True ,如果文件並不會關閉完成此程序。 |
註解
如需搭配 Application 物件使用事件的詳細資訊,請參閱 搭配 Application 物件使用事件。
範例
這個範例會在列印任何文件之前,提示使用者確認是否要列印文件。 此程式碼必須放置在類別模組中,並且必須正確初始化該類別的執行個體才能看到此範例工作;如需如何完成這項操作的指示,請參閱搭配 Application 物件使用 事件。
Public WithEvents appWord as Word.Application
Private Sub appWord_DocumentBeforeClose _
(ByVal Doc As Document, _
Cancel As Boolean)
Dim intResponse As Integer
intResponse = MsgBox("Do you really " _
& "want to close the document?", _
vbYesNo)
If intResponse = vbNo Then Cancel = True
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。