Aktion vorm Abspeichern durchführen - Problem mit Event "DocumentBeforeSave"

  • Word

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von crazyd.

    Aktion vorm Abspeichern durchführen - Problem mit Event "DocumentBeforeSave"

    Moin,

    ich beschäftige mich seit ein paar Tagen mit VBA für Word und wurschtel mich bis jetzt ganz gut durch. Allerdings bin ich momentan an einem Problem, dass sich einfach nicht lösen läßt.

    Ich muß eine Aktion starten, sobald der User oder irgend ein Makro versucht das Dokument zu speichern.
    Ich bin auf das Ereignis DocumentBeforeSave gestoßen, aber komme damit nicht klar.
    Momentan hab ich diesen Codeschnipsel

    Visual Basic-Quellcode

    1. Private Sub App_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
    2. Cancel = True
    3. MsgBox("not saved")
    4. End Sub

    in meinem Editor einfach unten rangehangen.
    Das Problem ist, dass zwar alle anderen Makros manuel ausgeführt werden können, mein DocumentBeforeSave-Event aber nicht berücksichtigt wird, wenn ich das Wordfile abspeichere.

    EDIT:
    Ich habe mich wohl geirrt, der Code von oben gehört in ein Klassenmodul:

    Visual Basic-Quellcode

    1. Option Explicit
    3. Public WithEvents App As Application
    5. Private Sub App_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
    6. Cancel = True
    7. MsgBox("not saved")
    8. End Sub


    In meiner "normalen" Klasse stoße ich damit die Objektzuweisung an:

    Visual Basic-Quellcode

    1. Sub AutoExec()
    2. Set objWord.App = Word.Application
    3. End Sub


    Es tut aber trotzdem nicht.

    Ich freue mich über eure Tipps!

    Viele Grüße

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „crazyd“ ()

Facebook
Telefonspende