How to get rid of pop-up mesg box?

N

none

I've got a macro that deletes all sheets but one. I would like to
bypass the pop-up mesg box confirming the requested deletion.

Any help is appreciated.

Thanks,
Mike
 
J

JMay

From Help:
Example
This example closes the workbook Book1.xls and doesn't prompt the user to
save changes. Any changes to Book1.xls aren't saved.

Application.DisplayAlerts = False
Workbooks("BOOK1.XLS").Close
Application.DisplayAlerts = True

HTH
 
Top