P
paul.schwellenbach
Hello there
I am using a class with
"Option Explicit
Public WithEvents FileSave As Application"
and a procedure with
"Private Sub FileSave_PresentationBeforeSave(ByVal Pres As Presentation, Cancel As Boolean)
MsgBox ("Aktiviert")
End Sub"
but I do not get it to work. When clicking SaveAs or Save, simply nothing happens. Can somebody tell me how to do the trick?
Thank you in advance, best regards
Paul
I am using a class with
"Option Explicit
Public WithEvents FileSave As Application"
and a procedure with
"Private Sub FileSave_PresentationBeforeSave(ByVal Pres As Presentation, Cancel As Boolean)
MsgBox ("Aktiviert")
End Sub"
but I do not get it to work. When clicking SaveAs or Save, simply nothing happens. Can somebody tell me how to do the trick?
Thank you in advance, best regards
Paul