Data may exist in the sheet(s) selected for deletion

[Kuih]

All right, this is a very simple macro.

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

However, right after I run this macro, a prompt appears:

"Data may exist in the sheet(s) selected for deletion. To permanently delete the data, press Delete."

Is there a way to remove this dialog box by adding an automatic reply for this prompt?

I am 100% sure that it is perfectly safe to delete it.

 

[FredMFoley]

Hi

Yes (This prevents the dialog box from appearing)

Application.DisplayAlerts = False
Sheets("Sheet3").Select
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = True

Fred

 

[Kuih]

Hi

Yes (This prevents the dialog box from appearing)

Application.DisplayAlerts = False
Sheets("Sheet3").Select
ActiveWindow.SelectedSheets.Delete
Application.DisplayAlerts = True

Fred

You're a natural genius! Thank you very, very much!