WorkbookBase.Saved Свойство
Определение
Важно!
Некоторые сведения относятся к предварительной версии продукта, в которую до выпуска могут быть внесены существенные изменения. Майкрософт не предоставляет никаких гарантий, явных или подразумеваемых, относительно приведенных здесь сведений.
Возвращает или задает значение, указывающее на отсутствие изменений, внесенных в книгу со времени последнего сохранения.
public bool Saved { get; set; }
Значение свойства
Значение true, если с момента последнего сохранения в книгу не вносились изменения; в противном случае — значение false.
Примеры
В следующем примере кода показан обработчик BeforeClose события, предлагающий пользователю либо сохранить изменения, но не сохранить изменения, либо отменить операцию закрытия в случае внесения изменений в книгу с момента последнего сохранения. Если пользователь не сохраняет изменения, Saved свойство книги задается true таким образом, чтобы Microsoft Office Excel не предложит пользователю сохранить книгу при продолжении операции закрытия. Если пользователь отменяет операцию закрытия, Cancel параметр WorkbookEvents_BeforeCloseEventHandler обработчика событий имеет значение, true так что Microsoft Office Excel не закрывает книгу.
Этот пример предназначен для настройки на уровне документа.
private void WorkbookBeforeClose()
{
this.BeforeClose +=
new Excel.WorkbookEvents_BeforeCloseEventHandler(
ThisWorkbook_BeforeClose);
}
void ThisWorkbook_BeforeClose(ref bool Cancel)
{
if (!this.Saved)
{
DialogResult result = MessageBox.Show("Do you want to save the " +
"changes you made to " + this.Name + "?", "Example",
MessageBoxButtons.YesNoCancel);
switch (result)
{
case DialogResult.Yes:
this.Save();
break;
case DialogResult.Cancel:
Cancel = true;
break;
// The following code ensures that the default Save File
// dialog is not displayed.
case DialogResult.No:
this.Saved = true;
break;
}
}
}
Sub ThisWorkbook_BeforeClose(ByRef Cancel As Boolean) _
Handles Me.BeforeClose
If Not Me.Saved Then
Dim result As DialogResult = _
MessageBox.Show("Do you want to save the " & _
"changes you made to " & Me.Name & "?", _
"Example", MessageBoxButtons.YesNoCancel)
Select Case result
Case DialogResult.Yes
Me.Save()
Case DialogResult.Cancel
Cancel = True
' The following code ensures that the default Save File
' dialog is not displayed.
Case DialogResult.No
Me.Saved = True
End Select
End If
End Sub
Комментарии
Если книга никогда не сохранялась, ее Path свойство возвращает пустую строку ("").
Это свойство можно установить в значение, true Если необходимо закрыть измененную книгу без сохранения или запроса на ее сохранение.