- ベストアンサー
印刷時の確認メッセージについて
- 印刷ボタンを作成し、印刷時にプレビュー表示をするかを確認するメッセージを表示させたいと思っています。
- ボタン押下時に表示されるメッセージの順番を以下のようにしたいです。
- 上記のように表示させるVBAがあれば教えてください。
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
関連するQ&A
- EXCEL VBA 印刷時にメッセージ表示
初めまして、こんにちは。 EXCEL VBA初心者で少々困っております。 EXCEL VBAを使い、ボタンに印刷するマクロを登録しました。 ボタンを押すと、指定の帳票が印刷できるようにはできたのですが、 追加の機能を盛り込みたいと思っています。 印刷する際、内容がいくつかあるので、それぞれテンプレートを作成したのですが、 印刷する内容がテンプレートそのままの場合は、メッセージボックスでメッセージを表示し、 印刷処理を中止するようにしたいのです。 テンプレートの内容は数量等が入るので、「○個」などとなっており、 数量などを適宜正しい値に変更した上で印刷処理をしたいため、 テンプレートのままの場合はNGとしたいです。 拙い説明で申し訳ございませんが、ご教示頂けますと助かります。 よろしくお願い致します。
- ベストアンサー
- その他MS Office製品
- レポートで空データ時に印刷しない
教えてください。 VBA「Private Sub コマンドボタン_Click()」で 「Docmd.OpenReport "レポート名"」の1文があるのですが、レポートプロパティで空データの時は印刷しないようなマクロ「全マクロの中止」を組んであります。 確かに、空データ時は中止がかかり印刷はされないのですが、実行時エラー2001 直前の操作はキャンセルされました。とエラーメッセージが帰ってきます。デバックをクリックすると、「Docmd.OpenReport "レポート名"」の一文が黄色くなっています。 どうしたら、綺麗に処理を終了する事ができるのでしょうか?教えてください。
- 締切済み
- オフィス系ソフト
- メッセージボックス vbYesNoCancel
こんにちは。 EXCEL VBA初心者です。 メッセージボックス vbYesNoCancelを以下のように使用したいのですが 行き詰ってしまいました。 ・はいの場合===>通常使うプリンタで印刷 ・いいえの場合===>ファイル名を指定して保存(保存先は、使用する人が指定) ファイル名は、AAAと設定したい ・キャンセルの場合は、マクロの実行をキャンセルするのみ Sub sumple() Dim vConf vConf = MsgBox("印刷しますか?保存の場合は、NOをクリックして下さい", vbYesNoCancel) Select Case vConf Case vbYes Sheets("Agreement(1)").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Case vbNo ここがわかりません。 Case Else Exit Sub End Sub Windows XP EXCEL 2003を使用しています。 どうぞ宜しくお願い致します。
- ベストアンサー
- オフィス系ソフト
- 筆王のBJプレビューについて
間違えて、印刷設定で一枚一枚プレビューを見ると設定したと思いますが、解除し連続して印刷したいのですが、BJプレビューが表示されて、印刷中止をクリックしても、再びBJプレビューが表示されて中止が出来ません。ファイルから終了をクリックすると、「BJプレビューを終了します。印刷を開始しますか?BJプレビューを続ける場合はキャンセルをクリック」という表示が出て、印刷を取りやめることが出来ません。 連続印刷したいのですが困っています。
- ベストアンサー
- その他(ソフトウェア)
- 確認メッセージの出力
PHP+SQLiteで掲示板を作成しております。 そこで、「投稿」ボタン押下時に確認メッセージを表示させたいのですが、どのような方法があるのでしょうか? スクリプトを使うしか方法は無いでしょうか? ご教授お願いいたします。
- 締切済み
- PHP
- 印刷途中で「印刷を中止します」とメッセージが出ます
インクジェットプリンターDCP-J577Nを使っています。 印刷の途中で「印刷を中止します」とメッセージが出て用紙が吐き出され印刷が途中で終了。 続けて次の用紙で印刷が始まったのですが、再び「印刷を中止します」とのメッセージの後、用紙が吐き出されて2枚用紙が無駄になってしまいました。 きれいに印刷したく写真用の高品質用紙を使っていたのですが、また無駄になってしまうのでは、と怖くて印刷できません。 なぜ「印刷を中止します」と出るのでしょうか? せめてプリンターに上記メッセージの後その理由を表示してもらえると対策のしようがあるのですが。 どなたか解決方法をご存知の方は教えていただけませんでしょうか。 よろしくお願い致します。 ※OKWAVEより補足:「ブラザー製品」についての質問です。
- ベストアンサー
- プリンター・スキャナー
- データグリッドの削除ボタンを押した時に、メッセージボックスを表示させるには?
VisualStudioのVBでASP.NETの開発をしています、初心者です。 データグリッドにデータが表示されていて、 「削除」のボタンを表示させています。 「削除」ボタンを押した時に、メッセージボックスが出てきて、 ――――――――― 「削除しますか?」 「YES」 「NO」 ――――――――― 「YES」を押せば、削除されて、「NO」を押せばキャンセルする。 このようなメッセージボックスを表示させるには、 どうしたらよいのか悩んでます。 どうか、よろしくお願いしますm(_ _)m
- ベストアンサー
- Microsoft ASP
- VBAで印刷プレビューを閉じる時に別シートに移動したい
エクセルで、 (1)入力画面(シート1) (2)印刷用画面1(シート2) (3)印刷用画面2(シート3) と1つの入力シートから2つのシートへ値をリンクさせ 表示しているものを作りました。 入力画面に「印刷ボタン1」「印刷ボタン2」を作成し、 「印刷ボタン1」を押すと、(2)印刷用画面1の印刷プレビューを表示するように ボタン押下のイベントに Sheets(シート2).Select ActiveWindow.SelectedSheets.PrintPreview と記述して、印刷プレビューを表示するようにしました。 その後、印刷プレビュー画面にて「閉じる」を押したり、ESCを押すと、 シート2が表示されます。 これをシート1の入力画面に移動させたいんです。 印刷プレビューを閉じた後に入力画面に戻りたいのですが、 どうしたらよいのか分かりません。 「印刷プレビューが閉じた」というイベントを取得する方法が あるのかも調べきれず、どうしたらいいのか困っています。 解決する方法がありましたら教えて下さい。
- 締切済み
- オフィス系ソフト
- 【クリレポ】プレビュー画面からの印刷について
いつも参考にさせてもらっています。 【質問内容】 フォームに貼りつけた印刷ボタン押下時は、設定したプリンタから印刷されます。 しかし、プレビュー画面を表示後、その画面にある印刷ボタンを押下した時には印刷ダイアログが開いて、通常使うプリンタがデフォルトで設定されてしまいます。 この「通常使うプリンタ」になってしまう部分を他のプリンタに設定したいのです。 何か良い方法はないものでしょうか?
- ベストアンサー
- Visual Basic
- 印刷をキャンセル
ExcelのVBAで印刷時に確認メッセージを出力したい、と思っています。 もっと言えば確認メッセージでOKとNGを分岐させたいと考えています。 OKならプリンタプロパティを、NGならプリンタ処理前に取り消すというような。 Workbook_BeforePrintにて印刷前のメッセージ出力はできるのですが、印刷を止めたりすることができず意味をなさない状態です^^; プロパティも、「ファイル」-「印刷」からなら自動で表示されますが(このとき印刷を中止できるのですけど)、ツールバーから印刷すると即印刷をはじめてしまってどうにも苦戦しています。 Workbook_BeforePrintが終了した時点で印刷処理に入るのだと思うので中止することは可能なのかなと思うのですが…。 どなたかいい方法をご存じないでしょうか?
- ベストアンサー
- オフィス系ソフト
お礼
ご回答ありがとうございます。 おかげ様で希望通りの結果を得られました!