Как подавить сообщение об ошибке после отмены печати отчета?

Question

Я использовал DoCmd.RunCommand acCmdPrint для печати отчета. Если я распечатаю отчет, хорошо. Но если я отменю, Access покажет ошибку и остановит запуск кода кнопки.

Я использовал DoCmd.SetWarnings (False), но не подавляю эту ошибку.

Как я могу это сделать?

Answer 1

Вам необходимо проверить код ошибки в вашем обработчике ошибок, и если он "Операция отменена", игнорируйте его.

Option Explicit

Sub Something()
    On Error GoTo Trap

    'DoCmd...

Leave:
    On Error GoTo 0
    Exit Sub

Trap:
    If Err.Number <> 2501 Then MsgBox Err.Description, vbCritical
    Resume Leave
End Sub