ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Closing the Print Dialogue box (https://www.excelbanter.com/excel-programming/333900-closing-print-dialogue-box.html)

[email protected]

Closing the Print Dialogue box
 
Hi:
I would appreciate help with the following:

I have placed code in the Workbook Before Print Event, to alert the
user by displaying a messagebox, if Cell A1 is left blank. The message
states something like this:

"Please enter name in cell A1 before printing this sheet"

Next, I would like to prevent the user from printing the sheet if cell
A1 is blank.

What additional line of code do I need to add so that the "Print
Dialogue" box closes or does not appear at all, thus preventing the
user from printing if cell A1 is left blank?

TIA
Would appreciate your help with the code

Thanks
Vinay


Rob Bovey

Closing the Print Dialogue box
 
Hi Vinay,

Set the Cancel argument of the event procedure to True to cancel
printing.

--
Rob Bovey, Excel MVP
Application Professionals
http://www.appspro.com/

* Take your Excel development skills to the next level.
* Professional Excel Development
http://www.appspro.com/Books/Books.htm

wrote in message
ups.com...
Hi:
I would appreciate help with the following:

I have placed code in the Workbook Before Print Event, to alert the
user by displaying a messagebox, if Cell A1 is left blank. The message
states something like this:

"Please enter name in cell A1 before printing this sheet"

Next, I would like to prevent the user from printing the sheet if cell
A1 is blank.

What additional line of code do I need to add so that the "Print
Dialogue" box closes or does not appear at all, thus preventing the
user from printing if cell A1 is left blank?

TIA
Would appreciate your help with the code

Thanks
Vinay




[email protected]

Closing the Print Dialogue box
 
Thanks
It worked!
V



All times are GMT +1. The time now is 04:29 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com