Print and Close

[SITCFanTN]

I'm using this code for a command button to open the print diolog box and
then close the form without saving it after it prints however it is not
working properly. The print dialog box displays but after I select my
printer, the document does not print. Any suggestions on why this is not
working. Thank you.

Private Sub CommandButton1_Click()

Dialogs(wdDialogFilePrint).Display

ActiveDocument.Close wdDoNotSaveChanges


End Sub

 

[Doug Robbins - Word MVP]

Use

Dialogs(wdDialogFilePrint).Show

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP