title | keywords | f1_keywords | api_name | ms.assetid | ms.date | ms.localizationpriority | ||
---|---|---|---|---|---|---|---|---|
Application.DocumentBeforePrint event (Word) |
vbawd10.chm400006 |
|
|
0736197a-5770-7e00-9882-86be0579c83e |
06/08/2017 |
medium |
Occurs before any open document is printed.
expression.DocumentBeforePrint (Doc As Document**, Cancel As Boolean)
expression A variable that represents an 'Application' object declared with events in a class module.
Name | Required/Optional | Data type | Description |
---|---|---|---|
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, see Using 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
[!includeSupport and feedback]