Hi, i'm using the line:
Sheets("Sheet2").Delete

However, on execution, I get a warning messagebox:
"Data may exist in the sheet(s) selected for deletion. To permanently
delete the data, press Delete."

How do I suppress messages of these types?

Thanks.

and if you set it to false, make sure you always set it back to true

Application.DisplayAlerts = False
Sheets("Sheet2").Delete
Application.DisplayAlerts = True

--


Gary

"hamishd" wrote in message
...
Hi, i'm using the line:
Sheets("Sheet2").Delete

However, on execution, I get a warning messagebox:
"Data may exist in the sheet(s) selected for deletion. To permanently
delete the data, press Delete."

How do I suppress messages of these types?

Thanks.

Hi,

Try:

Application.DisplayAlerts = False
Sheets("Sheet2").Delete
Application.DisplayAlerts = True

HTH,

Wouter