print out question

[Kavy]

Hello using a excel vb form if i have wsf.printout where wsf is a worksheet and the user clicks cancel when the printing screen comes up (the one that says printing page, # of # and it goes through all the pages) i get a error saying print out failed and the vb debugger pops up. How can I stop this error?

Thanks!

 

[sykes]

You could use an error handling routine:

Sub blah()
'your code here....
On Error GoTo bypass_print
wsf.PrintOut
'rest of your code here
Exit Sub
bypass_print: MsgBox "Bypass invoked, printout failed, or was cancelled"
End Sub

 

[Kavy]

Thanks!

 

[sykes]

Pleasure!

 

[Kavy]

Sykes, another question... That makes it exit my sub if someone clicks cancel, anyway to get it to just skip the print command?

 

[sykes]

Hi Kavy

Yes, copy and paste all of your code (AFTER the wsf.printout line) again, underneath the "bypass_print:" line, but there's no need to include my "Exit Sub" line right at the bottom.

This way, if the print goes OK, then the code just continues as normal to the "Exit Sub" line then stops.
If the user cancels the print, the code errors, goes to the "bypass_print:" line, tells the user that the print's failed, but then carries on as if nothing's happened.

Sub blah()
'your code here....
On Error GoTo bypass_print
wsf.PrintOut
'rest of your code here
Exit Sub
bypass_print: MsgBox "Bypass invoked, printout failed, or was cancelled"
'rest of your "normal" code here again, but only after the wsf.printout line
End Sub

Hope this works for you

 

[Kavy]

thanks!