Sub alert() Application.DisplayAlerts = False myWorkbook.Sheets("Summary").Delete Application.DisplayAlerts = TrueEnd Sub