Обработка ошибок при простой печати Excel Macro

Question

Извинения. Просто пытаюсь справиться с простым VBA в Excel, над которым я работаю. У меня есть про самый простой макрос, связанный с кнопкой управления:

Sub Printx() 
    Application.Dialogs(xlDialogPrint).Show 
End Sub 

Это нормально для того, что мне нужно для этого. Я борюсь с обработкой ошибок, если я нажму «отменить» в появившемся диалоговом окне. Кажется, что не удалось пройти проверку на ошибку 1001. Я пробовал несколько строк goto, но все равно получаю ту же ошибку времени выполнения. Может кто-нибудь указать, где я иду не так.

Answer 1

Попробуйте

 Sub Printx()  
     Dim x As Variant 
     x = Application.Dialogs(xlDialogPrint).Show 
     If TypeName(x) = "Boolean" Then Exit Sub 
     End Sub