Ｐａｇｅ 847 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼印刷中のダイアログボックスのキャンセルについて EBA 03/3/7(金) 12:34 ┗On Errorで逃げるってのは？ こう 03/3/7(金) 14:17 ┗Re:On Errorで逃げるってのは？ EBA 03/3/7(金) 15:16 ─────────────────────────────────────── ■題名 ： 印刷中のダイアログボックスのキャンセルについて ■名前 ： EBA ■日付 ： 03/3/7(金) 12:34 -------------------------------------------------------------------------
| お世話になります。 ＥＸＣＥＬＶＢＡ初心者のＥＢＡです。 早速ですが質問させていただきたいのです。 シート上に「印刷」ボタンをおいて、それをクリックすると 印刷のダイアログボックスが表示されるようにしたのですが、 '----------------------------------------------- '「印刷」ボタン Sub goPrint() Application.Dialogs(xlDialogPrint).Show End Sub '----------------------------------------------- ＯＫをクリックした後にでる「印刷中」のダイアログボックスにある 「キャンセル」をクリックすると「DialogクラスのShowメソッドが 失敗しました」という表示が出てエラーになってしまいます。 きちんと印刷をキャンセルさせるにはどうしたらよいのでしょう？ キャンセルをクリックしても無効にするとか・・・^_^; ちなみに、ＥＸＣＥＬ画面はメニューバー、列行番号、シート見出し 等すべて非表示にしています。 どなたかご教授お願いします。 |
| EBAさん、こんにちわ。 >'----------------------------------------------- >'「印刷」ボタン >Sub goPrint() On Error Resume Next > Application.Dialogs(xlDialogPrint).Show >End Sub >'----------------------------------------------- > >「キャンセル」をクリックすると「DialogクラスのShowメソッドが >失敗しました」という表示が出てエラーになってしまいます。 >きちんと印刷をキャンセルさせるにはどうしたらよいのでしょう？ |
| ▼こう さん： こんにちは(^o^) すばやい回答ありがとうございます！ こうさんから頂いたお返事で解決できました！ 御指導ありがとうございました。 これからも、勉強しながら頑張りますので 宜しくお願いします。m(__)m |