Freigeben über


Document.BeforeSave-Ereignis

Wird ausgelöst, bevor das Dokument gespeichert wird.

Namespace:  Microsoft.Office.Tools.Word
Assemblys:   Microsoft.Office.Tools.Word.v4.0.Utilities (in Microsoft.Office.Tools.Word.v4.0.Utilities.dll)
  Microsoft.Office.Tools.Word (in Microsoft.Office.Tools.Word.dll)

Syntax

'Declaration
Event BeforeSave As SaveEventHandler
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. Dieses Beispiel bezieht sich auf ein Add-In auf Anwendungsebene.

    Private Sub DocumentBeforeSave()
        Dim vstoDoc As Document = Globals.Factory.GetVstoObject(Me.Application.ActiveDocument)
        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 = Globals.Factory.GetVstoObject(this.Application.ActiveDocument);
    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;
    }
}

.NET Framework-Sicherheit

Siehe auch

Referenz

Document Schnittstelle

Microsoft.Office.Tools.Word-Namespace