Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

72302 / 76738

←次へ　｜　前へ→


	【8920】Re:印刷前イベントでプレビューの時は何もし...

kein - 03/11/8(土) 22:20 -


	引用なし

	パスワード

イベントマクロにしないで、普通のマクロで切り替えた方が良いかと思いますが、
どうしてもということなら

Private Sub Workbook_BeforePrint(Cancel As Boolean)
　 Dim Ans As Integer

　 Ans = MsgBox("プレビューのみにしますか", 36)
　 If Ans = 6 Then
　　　Cance = True
　　　ActiveSheet.PrintPreview
　　　Exit Sub
　 End If
　 '印刷を実行することを前提としたコード
End Sub

みたいにするしかないでしょう。要はプレビューをトリガーにするイベントが
無いので、印刷ボタンを押したときだけ、プレビューにも分岐できるように
したらどうか、ということなんです。

0 hits

▼

【8917】印刷前イベントでプレビューの時は何もし... のり 03/11/8(土) 11:38