I am running a simple macro where I need to delete a worksheet named
"Pivot", using the following code in VBA:

Sheets("Pivot").Delete

However, when I run this, I get a dialog box within Excel that reads:

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

The dialog box has two buttons "Delete" (which is active) and "Cancel".

Is there a way that I can automate the pressing of the delete button so
that the end user doesn't have to respond to the dialog box?

Thanks in advance.

Set the DisplayAlerts to False before you do the delete, then restore it to
true after the delete. E.g.,

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


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
www.cpearson.com
(email address is on the web site)


"Scott G" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
>I am running a simple macro where I need to delete a worksheet named
> "Pivot", using the following code in VBA:
>
> Sheets("Pivot").Delete
>
> However, when I run this, I get a dialog box within Excel that reads:
>
> "Data may exist in the sheet(s) selected for deletion. To permanently
> delete the data, press delete"
>
> The dialog box has two buttons "Delete" (which is active) and "Cancel".
>
> Is there a way that I can automate the pressing of the delete button so
> that the end user doesn't have to respond to the dialog box?
>
> Thanks in advance.
>

Thanks Chip, that worked perfectly!


Chip Pearson wrote:
> Set the DisplayAlerts to False before you do the delete, then restore it to
> true after the delete. E.g.,
>
> Application.DisplayAlerts = False
> Sheets("Pivot").Delete
> Application.DisplayAlerts = True
>
>
> --
> Cordially,
> Chip Pearson
> Microsoft MVP - Excel
> www.cpearson.com
> (email address is on the web site)
>
>
> "Scott G" <(E-Mail Removed)> wrote in message
> news:(E-Mail Removed)...
> >I am running a simple macro where I need to delete a worksheet named
> > "Pivot", using the following code in VBA:
> >
> > Sheets("Pivot").Delete
> >
> > However, when I run this, I get a dialog box within Excel that reads:
> >
> > "Data may exist in the sheet(s) selected for deletion. To permanently
> > delete the data, press delete"
> >
> > The dialog box has two buttons "Delete" (which is active) and "Cancel".
> >
> > Is there a way that I can automate the pressing of the delete button so
> > that the end user doesn't have to respond to the dialog box?
> >
> > Thanks in advance.
> >