событие на отмену печати документа

[Andrey_K]

Озадачился следующей проблемой.
Был бланк документа в excel который автоматически заполнялся и появлялось окошко вывода на печать, где пользователи сами выбирали на какой принтер и сколько копий печатать, после вывода на печать этот бланк закрывался без сохранения. Сам код прост:
Application.Dialogs(xlDialogPrint).Show
ActiveWindow.Close savechanges:=False

все было здорово до тех пор пока не понадобилось до вывода на печать в этом бланке кое-что поправить, но как и положено, при нажатии кнопки "отмена" документ также закрывается.
Собственно вопрос - как перехватить нажатие кнопки отмена в диалоговом окне "печать"?!

[Template]

Код: Выделить всё

If Application.Dialogs(xlDialogPrint).Show Then
   MsgBox "печать"
   'ActiveWorkbook.Close False
Else
   MsgBox "отказ от печати"
End If

[Andrey_K]

хм, так просто - но работает
большая спасибка!