Здравствуйте!  
 
Как можно удалить лист с помощью макроса, без подтверждения на удаление...  
С помощью записи макросов получилось следующие:  
 
Sub УдалитьЛист()  
 
Sheets("TEST").Select  
ActiveWindow.SelectedSheets.Delete  
 
End Sub