Excel (Office 365) Workbook_BeforePrint event not firing

[essdeeay]

There have been other similar threads on here, but none have fixed this issue.

I want to insert content into the header of the spreadsheet, and the way to do this (I believe) is to use the Workbook_Before_Print() function:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Debug.Print "Running Workbook_BeforePrint"
    Cancel = True
End Sub

However, it isn't working - nothing is appearing in the Immediate window of the VBA editor. I can confirm that events are enabled because Worksheet_Change() works OK and as expected:

Private Sub Worksheet_Change(ByVal Target As Range)
    MsgBox "You just changed " & Target.Address
End Sub

Why does the Workbook_BeforePrint function not work? I don't actually need to get this to work, providing I can populate the header/footer of the sheet before printing.

Many thanks,
Steve

 

[Fluff]

You're code works for me.
Where is the code located?
Also, did you just do Ctrl P, or did you click print afterwards?

 

[essdeeay]

It's located in "Sheet1", but I've just tried it in "ThisWorkbook" and now it works. However, it doesn't work for PrintPreview, only when you actually print. Is there a way to get it in at the preview stage?

Many thanks

 

[Fluff]

Is there a way to get it in at the preview stage?

Not that I'm aware of.

 

[essdeeay]

[SOLVED] Re: Excel (Office 365) Workbook_BeforePrint event not firing

Thanks for the help Fluff

The solution was that Workbook_BeforePrint() only works in the Workbook object.

 

[Fluff]

Re: [SOLVED] Re: Excel (Office 365) Workbook_BeforePrint event not firing

You're welcome

 

[Joe4]

Re: [SOLVED] Re: Excel (Office 365) Workbook_BeforePrint event not firing

The solution was that Workbook_BeforePrint() only works in the Workbook object.

Yep, here is a little tip.
All the procedures that begin with "Workbook" only work in the "ThisWorkbook" module.
All the procedures that begin with "Worksheet" only work in the specific "Sheet" modules.