как в VBA EXCEL удалить диаграмму

[Danilka]

Привет всем !
необходимо подавить окно, "Удалить/отмена" прерывающее выполнение

Sheets("diag").Select
ActiveWindow.SelectedSheets.Delete


заранее благодарен

[GSerg]

application.displayalerts=false