Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


23784 / 76738 ←次へ | 前へ→

【58314】Re:ブックの印刷枚数を限定する
発言  りん E-MAIL  - 08/10/18(土) 14:02 -

引用なし
パスワード
   くやち さん、こんにちわ。

>現在、ツールバーの印刷ボタンを押し印刷するように取り決めしていますが、ブックを参照したり印刷する人が増え、中にはメニューバーから印刷を選択し、印刷のダイアログで印刷枚数を複数枚に設定し印刷する人が増えています。
>ブックを閉じる時に自動的にブックを保存するマクロを組んでいるため、設定した印刷枚数も保存され、次にブックを開く人がツールバー側の印刷ボタンを押すと複数枚印刷されてしまうことが多くなってしまいました。
これがよくわかりませんが。枚数まで保存されますか?

>そこで、ブックそのものに印刷枚数の変更ができないようにマクロを組みたいのですが、可能でしょうか?

Private Sub Workbook_BeforePrint(Cancel As Boolean)
  Cancel = True
End Sub
で、通常コマンドでは印刷できないようにして(マクロを無効にされると意味がないですが)、印刷メニューのコマンドバーまたはシート上のコマンドボタンを作成してそこからイベントキャンセルで印刷するようにしてみてはいかがでしょうか?
(シート).PrintOut Copies:=1で1枚だけ出せます。

0 hits

【58302】ブックの印刷枚数を限定する くやち 08/10/17(金) 10:49 質問
【58314】Re:ブックの印刷枚数を限定する りん 08/10/18(土) 14:02 発言
【58538】Re:ブックの印刷枚数を限定する くやち 08/10/29(水) 10:12 お礼

23784 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free