BeforePrint / AfterPrint i Excel

Jeg fandt denne løsning:

There is no AfterPrint event, but you can effectively create your own using the BeforePrint event as follows:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Static PrintRequest As Boolean

If PrintRequest = True Then Exit Sub

PrintRequest = True
ActiveSheet.PrintOut

'PUT YOUR AfterPrint CODE HERE
'This code will execute AFTER the print is completed

PrintRequest = False
Cancel = True
End Sub

The way this works is simply to cancel the manually-requested print, and instead execute a print from VBA so that right after the print you can do whatever operation you want.