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" <(E-Mail Removed)> wrote in message
news:660c4f19-df0b-4ff1-a2cb-(E-Mail Removed)...
> 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