Another way to suppress print besides Cancel = True?

  • Thread starter Thread starter mikeburg
  • Start date Start date
M

mikeburg

I have the following code to execute BeforePrint event.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
If ActiveSheet.Name = "Print Envelopes" Then
Application.OnTime Now + TimeValue("00:00:05"), ThisWorkbook.Name &
"!PrintEnvelopes"
Cancel = True
End If
End Sub

The problem is that I have a print routine within the code to be
executed 5 seconds after clicking & the Cancel = True prevents it.

Is there another way to suppress printing without using Cancel = True
in the BeforePrint event?

I want to be able to print via clicking printer Icon or running the
code.

Thanks a million. mikeburg
 
No, but you can suppress events

Sub PrintEnvelopes()
Application.EnableEvents = False
Activesheet.Printout
Application.EnableEvents = True
End Sub


this might help your recursive calls to ontime as well.
 
Thanks for the response. Can't seem to get it to work.

Is there a way to set the output to a dummy printer where nothing
prints?

thanks a million.. mikeburg
 
Still prints to the printer once preview is closed.

Any other ideas?

Thank you so very much. mikebur
 
Back
Top