Prompt Print Dialog

[Eranka]

HI

DoCmd.SelectObject acReport, "MyReport"
DoCmd.RunCommand acCmdPrint

i used above code to get the printer selection prompt. but when i click on cancel button on the prompt screen i get the below error

"The Run Command Action Was Cancelled", how can i ignore the above error?

[pbaldy]

With error handling:

http://www.baldyweb.com/ErrorTrap.htm

for that particular error, don't include the message box.

[davegri]

You need an error handler to ignore the error, which I think is 2501

Sub cmdPrint_Click()
    On Error GoTo cmdPrint_Click_Error
    DoCmd.SelectObject acReport, "MyReport"
    DoCmd.RunCommand acCmdPrint
cmdPrint_Click_EXIT:
    Exit Sub
cmdPrint_Click_Error:
    Select Case Err
        Case 2501   'do nothing, cancelled
        Case Else
            MsgBox Err.Number & ", " & Err.Description
    End Select
    Resume cmdPrint_Click_EXIT
End Sub