Freigeben über


Document.BeforeSave-Ereignis (2007 System)

Aktualisiert: Juli 2008

Wird ausgelöst, bevor das Dokument gespeichert wird.

Namespace:  Microsoft.Office.Tools.Word
Assembly:  Microsoft.Office.Tools.Word.v9.0 (in Microsoft.Office.Tools.Word.v9.0.dll)

Syntax

Public Event BeforeSave As SaveEventHandler

Dim instance As Document
Dim handler As SaveEventHandler

AddHandler instance.BeforeSave, handler
public event SaveEventHandler BeforeSave

Hinweise

Damit das Dokument nicht gespeichert wird, legen Sie das Cancel-Argument des bereitgestellten CancelEventArgs-Objekts auf true fest.

Beispiele

Im folgenden Codebeispiel wird vor dem Speichern des Dokuments eine Meldung angezeigt, in der Sie gefragt werden, ob das Dokument gespeichert werden soll.

Diese Version bezieht sich auf eine Anpassung auf Dokumentebene.

Private Sub DocumentBeforeSave()
    AddHandler Me.BeforeSave, AddressOf ThisDocument_BeforeSave
End Sub

Private Sub ThisDocument_BeforeSave(ByVal sender As Object, ByVal e As Microsoft.Office.Tools.Word.SaveEventArgs)
    If MessageBox.Show("Do you want to save the document?", "BeforeSave", _
        MessageBoxButtons.YesNo) = DialogResult.No Then
        e.Cancel = True
    End If
End Sub

private void DocumentBeforeSave()
{
    this.BeforeSave += new Microsoft.Office.Tools.Word.SaveEventHandler(ThisDocument_BeforeSave);
}

void ThisDocument_BeforeSave(object sender, Microsoft.Office.Tools.Word.SaveEventArgs e)
{
    if (MessageBox.Show("Do you want to save the document?", "BeforeSave",
        MessageBoxButtons.YesNo) == DialogResult.No)
    {
        e.Cancel = true;
    }
}

Diese Version bezieht sich auf ein Add-In auf Anwendungsebene.

Private Sub DocumentBeforeSave()
    Dim vstoDoc As Document = Me.Application.ActiveDocument.GetVstoObject()
    AddHandler vstoDoc.BeforeSave, AddressOf ThisDocument_BeforeSave
End Sub

Private Sub ThisDocument_BeforeSave(ByVal sender As Object, ByVal e As Microsoft.Office.Tools.Word.SaveEventArgs)
    If System.Windows.Forms.MessageBox.Show( _
        "Do you want to save the document?", "BeforeSave", _
        System.Windows.Forms.MessageBoxButtons.YesNo) = System.Windows.Forms.DialogResult.No Then
        e.Cancel = True
    End If
End Sub

private void DocumentBeforeSave()
{
    Document vstoDoc = this.Application.ActiveDocument.GetVstoObject();
    vstoDoc.BeforeSave += new Microsoft.Office.Tools.Word.SaveEventHandler(ThisDocument_BeforeSave);
}

void ThisDocument_BeforeSave(object sender, Microsoft.Office.Tools.Word.SaveEventArgs e)
{
    if (System.Windows.Forms.MessageBox.Show("Do you want to save the document?", "BeforeSave",
        System.Windows.Forms.MessageBoxButtons.YesNo) == System.Windows.Forms.DialogResult.No)
    {
        e.Cancel = true;
    }
}

Berechtigungen

Siehe auch

Referenz

Document-Klasse

Document-Member

Microsoft.Office.Tools.Word-Namespace

Änderungsprotokoll

Date

Versionsgeschichte

Grund

Juli 2008

Version des Codebeispiels für ein Add-In auf Anwendungsebene hinzugefügt.

SP1-Featureänderung.