using VBA how can I delete a worksheet w/o the warning message pop

[Jim K.]

using VBA how can I delete a worksheet without having the warning message
popup "Data may exist in the sheet(s) ..."? I'm using
Sheets("Sheet1").Select
ActiveWindow.SelectedSheets.Delete

 

[FSt1]

hi
Application.DisplayAlerts = False
Sheets("Sheet1").Select
ActiveWindow.SelectedSheets.Delete
application.DisplayAlerts = True


Regards
FSt1

 

[Kevin B]

Insert the following command before the delete

Application.DisplayAlerts = False

Then at the end

Application.DisplayAlerts = True


Although display alerts comes back on automatically I always include the
line to turn it back on. Who know, MS might decide some day that you need to
do it, and if that happens my code will already be up to date.