Mein Latein ist am Ende!
Ich weiß nicht, wo und wie ich einen Code eingeben muss, der nach dem Druckvorgang ausgeführt wird!
Ich möchte, dass eine MsgBox NACH dem Durcken angezeigt wird!
Wie kann ich das erreichen?
Danke für eure Hilfe!
Florian
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
Application.EnableEvents = False
ActiveSheet.PrintOut
MsgBox "Gedruckt"
Application.EnableEvents = True
End Sub
Gruß
Reinhard