[[20180318080848]]　『セルに入力確認して印刷』（なな）　ページの最後に飛ぶ

『セルに入力確認して印刷』（なな）

入力シート名A　A1
印刷するシート名B
AシートA1:C1にいずれのセルに数値が入力されたら印刷を許可
未入力だったら印刷を拒否
印刷範囲は１ページになります。
よろしくお願いします。

＜使用 Excel：Excel2003、使用 OS：WindowsXP ＞

 おはようございます。＾＾

 Workbook_BeforePrint　イベントプロシジャーで
キャンセルをTrueにすると
印刷出来ないとおもいます。
あとはif構文で条件分岐すれば可能かと。
違ってましたらお許しを。

（隠居じーさん） 2018/03/18(日) 08:30

追伸
でもマクロを無効にされたら。。。＾＾；
って突っ込みがきそ～です。
対処法はいろいろサイト検索ででみつかるかもです。
でわ
わたしはこれで失礼いたします。
他の方のご回答をおまちください。

（隠居じーさん） 2018/03/18(日) 10:56

BシートをVisible=veryHiddenにしておく。
VBAプロジェクトをパスワード設定する。

AシートA1: C1にいずれのセルに数値が入力されたかをVBAで判定し、入力されていればBシートをVisible=trueにして印刷する。

ブックは読取専用にしておく。
（mm） 2018/03/19(月) 11:13

コメント返信：