Удаление листа без предупреждения

[tolikman]

Здраствуйте форумчане...
Дайте пожалуйста ответ на такой вопрос:
можно ли удалять листы макросом так, чтобы Excel не спрашивал пользователя о его уверенности в этом, тем более, что я их(листы) макросом и создал. Поиск ответа на такой вопрос по форуму результатов не дал.

[Евгений ГВС]

Упоминалось недавно на форуме

    Application.DisplayAlerts = False   ' выключаем вывод предупреждений
    Application.DisplayAlerts = True    ' включаем обратно

[aval]

А так не пойдёт?
Sub Workbook_Open()
Sheets.Add
End Sub
Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next 'если такого листа в книге нет
Application.DisplayAlerts = False
With ActiveWorkbook
.Sheets("Лист1").Delete
.Save
.Close
End With
Application.DisplayAlerts = True
End Sub

[tolikman]

спасибо большое!!