Override Delete Confirmation

[Nomas]

Hello All,

I have the following code that I want to override all delete confirmations for the data delete confirmation and the page delete confirmation

Sub Deleteupload()
'
' Deleteupload Macro
'

'
Sheets("Item Upload Template").Select
Rows("4:4").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.ClearContents
Range("A3").Select
Selection.ClearContents
Sheets("ItemUploadFile").Select
ActiveWindow.SelectedSheets.Delete
Sheets("Item ListChecksheet").Select
ActiveWindow.SelectedSheets.Delete
Sheets("Item List").Select
End Sub

I tried to input the following but am at a loss as to where it goes.

Application.DisplayAlerts = False
Worksheets("MySheet").Delete
Application.DisplayAlerts = True

Please keep in mind that I want to override both the data and sheet deletion warnings.

Thanks in advance,

 

[Sektor]

[COLOR="Blue"]Sub[/COLOR] Deleteupload()
 '
 ' Deleteupload Macro
 '

 '
[B] Application.DisplayAlerts = [COLOR="Blue"]False[/COLOR][/B]
 Sheets("Item Upload Template").Select
 Rows("4:4").Select
 Range(Selection, Selection.End(xlDown)).Select
 Selection.ClearContents
 Range("A3").Select
 Selection.ClearContents
 Sheets("ItemUploadFile").Select
 ActiveWindow.SelectedSheets.Delete
 Sheets("Item ListChecksheet").Select
 ActiveWindow.SelectedSheets.Delete
 Sheets("Item List").Select
[B] Application.DisplayAlerts = [COLOR="Blue"]True[/COLOR][/B]
[COLOR="Blue"]End[/COLOR] [COLOR="Blue"]Sub[/COLOR]

 

[Nomas]

Thanks Sektor, it worked great!