Application.DocumentBeforeClose event (Publisher)

Occurs immediately before any open document closes.

Syntax

expression.DocumentBeforeClose (Doc, Cancel)

expression A variable that represents an Application object.

Parameters

Name	Required/Optional	Data type	Description
Doc	Required	Document	The document that is being closed.
Cancel	Required	Boolean	False when the event occurs. If the event procedure sets this argument to True, the document does not close when the procedure is finished.

Remarks

To access the Application object events, declare an Application object variable in the General Declarations section of a code module, and then set the variable equal to the Application object for which you want to access events.

For information about using events with the Microsoft Publisher Application object, see Using events with the Application object.

Example

This example prompts the user for a yes or no response before closing a document. To see this example work, this code must be placed in a class module and an instance of the class must be correctly initialized, using an example similar to the SetPubApp routine below.

Private WithEvents PubApp As Application 
 
Sub SetPubApp() 
 Set PubApp = Publisher.Application 
End Sub 
 
Private Sub PubApp_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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.