Hide error 2501

[mbamber]

Hi all,

I'm sure this is on the web somewhere, but I just can't seem to find it!

I currently have a simple piece of code:

Private Sub PDF_Click()
DoCmd.OutputTo acOutputReport, , ".pdf", , -1, , 0, acExportQualityPrint
End Sub

My problem is that when the save as dialogue appears, if the user then clicks either close or cancel, error 2501 appears - "The OutputTo action was canceled."

Is it possible to just hide this error if it appears and if so, how could I do this?

TIA

 

[pr2-eugin]

How about adding a Proper Error Handler? Something along the lines of..

Private Sub PDF_Click()
On Error GoTo errHandler
    DoCmd.OutputTo acOutputReport, , ".pdf", , -1, , 0, acExportQualityPrint
errExit:
    Exit Sub
errHandler:
    If Err.Number <> 2501 Then MsgBox "Error - " & Err.Number & ": " & Err.Description, vbCritical, "Fatal Error"
    Resume errExit
End Sub

 

[mbamber]

Fantastic, I knew it would be simple for someone; just not me!

 

[pr2-eugin]

Glad to help, bookmark Chip Pearson's link on Error Handling.. It is a good place to start learning about good error handling techniques.. Good Luck..