- ベストアンサー
作業グループで印刷しようとすると、警告したい！
Excelの印刷について質問です。 複数シートを、印刷する際に1枚ずつ印刷してほしいのです。 作業グループにして印刷をしようとすると、警告が出るようにしたいのですが、こんなことできるのでしょうか？ どなたか分かる方、教えてくださーい！
- ringokare-
- お礼率100% (1/1)
- オフィス系ソフト
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
ThisWorkbookモジュールに、 Private Sub Workbook_BeforePrint(Cancel As Boolean) If ActiveWindow.SelectedSheets.Count > 1 Then MsgBox "作業グループで印刷印刷はダメ！" Cancel = True End If End Sub で、どうでしょう？
お礼
ありがとうございます！！！ すごいですね！ 出来ました～～～！！