Application.DocumentBeforePrint Event (Word)
Occurs before any open document is printed.
Private Sub expression _'DocumentBeforePrint'(ByVal Doc As Document , Cancel As Boolean)
expression A variable that represents an 'Application' object declared with events in a class module.
|Doc||Required||Document||The document that's being printed.|
|Cancel||Required||Boolean||False when the event occurs. If the event procedure sets this argument to True , the document isn't printed when the procedure is finished.|
For more information about using events with the Application object, seeUsing Events with the Application Object.
This example prompts the user for a yes or no response before printing any document. This code must be placed in a class module, and an instance of the class must be correctly initialized to see this example work; see Using Events with the Application Objectfor directions on how to accomplish this.
Public WithEvents appWord as Word.Application Private Sub appWord_DocumentBeforePrint _ (ByVal Doc As Document, _ Cancel As Boolean) Dim intResponse As Integer intResponse = MsgBox("Have you checked the " _ &; "printer for letterhead?", _ vbYesNo) If intResponse = vbNo Then Cancel = True End Sub