View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default Another way to suppress print besides Cancel = True?

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.
--
Regards,
Tom Ogilvy


"mikeburg" wrote in
message ...

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


--
mikeburg
------------------------------------------------------------------------
mikeburg's Profile:

http://www.excelforum.com/member.php...o&userid=24581
View this thread: http://www.excelforum.com/showthread...hreadid=490604