Excel sub FileSaveAs

[D-RiSe]

Vraagje....

als ik in word de saveas functie wil vervangen met mijn eigen stukje proggerij maak ik in een macro gewoon een sub

code:

Sub FileSaveAs()
msgbox "hoi"
End Sub

en als ik dan op File -> Save as klik krijg ik dus die messagebox....

maar hoe doe ik dat in excel.....???? bovenstaande manier werkt dan namelijk niet...

[Verwijderd]

code:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    MsgBox ("before save")
End Sub

[D-RiSe]

geweldig...bedankt.. ook enig idee hoe het in powerpoint moet?

[Verwijderd]

Ehhh.... gewoon blijven proberen, dan vind je het zelf wel...