「ワークブックBeforePrint」が実行されない

この単純化されたワークブックを印刷することは、それらのいずれでもありませんでした。ただし、BeforePrintは起動しますが、プレビューペインと印刷をクリックした後にのみメッセージボックスが表示されます。

実際に印刷が行われる前に、変更内容をプレビューすることができるはずです。私が間違っている？

私はExcel 2016を使用しています。私はA1の値を取得するために私のヘッダーを取得しようとしており、これを行う例が見つかりました。しかし、私はBeforePrintイベントを稼働させることに何の不運も感じていません。何も私がいた1と間違っていることができなかったよう

はブランドの新しいブックを開始：

私のオリジナルコードは、私が試してみました
```
Private Sub Workbook_BeforePrint(Cancel As Boolean) 
    ActiveSheet.PageSetup.CenterHeader = Range("A1").Value 
End Sub 
```
トラブルシューティング（ちなみに私はそれを望んでいました）この関数を追加しようとしています。
もっと複雑なことをするのではなく、単純なメッセージボックスを表示させるだけです。
他のイベントを実行して、イベントの思考プロセスが正しいことを確認しようとしました。
デザインモードが
にマクロのセキュリティを（コメントごとに更新）シートが編集可能にするために、細胞の一つでいくつかのランダムな文字を持っているマクロ
許可するように設定されていません以下

です3つのイベントで私の問題のトラブルシューティングを試みました。 "BeforeSave" & "Open"イベントは正常に動作します。

Private Sub Workbook_BeforePrint(Cancel As Boolean) 

    MsgBox "Printing... Maybe..." 

End Sub 

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) 

    MsgBox "Saving..." 

End Sub 

Private Sub Workbook_Open() 

    Debug.Print "Running Open" 
    MsgBox "Welcome" 

End Sub

出典

2016-11-30 Collin Dando

シートに何かがありますか？空白のシートを印刷することはできません。 –

シート上にデータがあることを反映するために質問を変更しました –

ファイルが実際に印刷されますか？ –