Этот совет показывает как выключить или подавить предупреждающие сообщения, которые MS Excel выдаёт по умолчанию.
   Подавление генерируемых приложением предупреждающих сообщений избавляет пользователя от повторяющихся запросов на подтверждение действий, которые заведомо нужно выполнить.
   Это может стать критичным в ситуащии клиент-сервер. Если Excel запущен с сервера, предупреждающие сообщения могут отображаться, а могут и не отображаться на стороне клиента. В случае, когда предупреждение не отображается, пользователь не может на него ответить, и приложение становится недоступным.
   Если Вы установите свойство DisplayAlerts в состояние False, то Excel будет подавлять все предупреждающие сообщения, однако когда выполнение Вашей программы завершится, DisplayAlerts не возвратится в состояние True. Вам следует вручную устанавливать это свойство в True, каждый раз, когда завершается Ваша процедура.
   Примечание. Такое поведение отличается от поведения в версиях Excel, предшествующих Excel 97. Раньше свойство DisplayAlerts автоматически возвращалось в состояние True по завершении работы процедуры.

Пример: Выключение предупреждающих сообщений при удалении листа.

Sub DeleteSheet()
    Application.DisplayAlerts = False
    ThisWorkbook.Sheets(1).Delete
    Application.DisplayAlerts = True
End Sub

© design & content by Acidigital, 2001