Evento Workbook.BeforeSave (sistema de 2007)

Artigo
08/25/2010

Ocorre antes da pasta de trabalho é salva.

Namespace: Microsoft.Office.Tools.Excel
Assembly: Microsoft.Office.Tools.Excel.v9.0 (em Microsoft.Office.Tools.Excel.v9.0.dll)

Sintaxe

Public Event BeforeSave As WorkbookEvents_BeforeSaveEventHandler

Dim instance As Workbook
Dim handler As WorkbookEvents_BeforeSaveEventHandler

AddHandler instance.BeforeSave, handler

public event WorkbookEvents_BeforeSaveEventHandler BeforeSave

Exemplos

O exemplo de código a seguir demonstra um manipulador para o BeforeSave evento. O manipulador de eventos solicita ao usuário para continuar com a gravação operação ou cancele-a.Se o usuário cancelar o salvar operação e, em seguida, a Cancel parâmetro das WorkbookEvents_BeforeSaveEventHandler manipulador de eventos é definido como true para que o Microsoft Office Excel não salva a pasta de trabalho.

Este exemplo é para uma personalização em nível de documento.

Sub ThisWorkbook_BeforeSave(ByVal SaveAsUI AsBoolean, _
    ByRef Cancel AsBoolean) HandlesMe.BeforeSave

    If DialogResult.No = MessageBox.Show("Are you sure " & _
        "you want to save the workbook?", "Sample", _
        MessageBoxButtons.YesNo) Then
        Cancel = True
        MessageBox.Show("Save is canceled.")
    EndIfEndSub

privatevoid WorkbookBeforeSave()
{
    this.BeforeSave +=
        new Excel.WorkbookEvents_BeforeSaveEventHandler(
        ThisWorkbook_BeforeSave);
}

void ThisWorkbook_BeforeSave(bool SaveAsUI, refbool Cancel)
{
    if (DialogResult.No == MessageBox.Show("Are you sure you want to " +
        "save the workbook?", "Example", MessageBoxButtons.YesNo))
    {
        Cancel = true;
        MessageBox.Show("Save is canceled.");
    }
}

Permissões

Confiança total para o chamador imediato. O membro não pode ser usado por código parcialmente confiável. Para obter mais informações, consulte Usando bibliotecas de códigos parcialmente Confiável.

Consulte também

Referência

Workbook Classe

Membros Workbook

Namespace Microsoft.Office.Tools.Excel

Partilhar via