Need help with DoCmd.OutputTo

[legs00]

Hi Well I am outputting records to an excel spreadsheet and I am using "DoCmd.OutputTo acOutputQuery". Now when I press the cancel button of that form I get an error:

Run-Time Error: "2501"
the OutputTo action was cancelled

What I would like to know is how to code so that if the cancel button of that OutputTo form is clicked then it will cancel that event or exit that form.
Thank you
Legs

 

[jimmythegeek]

Try this:

=====
Your Sub or Function()
On Error GoTo HandleError

..... Your Code Here

HandleError_Exit:
Exit Sub

HandleError:
If Err.Number = 2051 Then
Resume HandleError_Exit
Else
MsgBox Err.Number & ": " & Err.Description
Resume HandleError_Exit
End If
End Sub
Jim Lunde
compugeeks@hotmail.com
Custom Application Development