Automating key strokes to a dialog box

  • Thread starter Thread starter Scott G
  • Start date Start date
S

Scott G

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)
 
Thanks Chip, that worked perfectly!


Chip said:
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)
 
Back
Top