question about deleting a sheet without any warning

[Dat Tieu]

Hi,

How do I delete a sheet without any delete warning prompt? Or is there any
better way to delete a sheet? Thanks

VBA code: Sheets("Sheet1").Delete

 

[Don Guillett]

try
application.displayalerts=false
delete
reset to true

 

[Dat Tieu]

Thank you. It works great.

 

[Don Guillett]

glad to help

 

[Gord Dibben]

Dat

Sub SheetDelete()
Application.DisplayAlerts = False
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = True
End Sub

Gord Dibben Excel MVP