Place

Application.DisplayAlerts = False

prior to deleting the sheets.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Martin" wrote in message
...
I had great help with my last problem from bpeltzer.

Here is my new problem.

I now want to delete some worksheets without Excel asking me if
I really
want to do it. I am using the code below:

Sheets("Sheet1").Select
ActiveWindow.SelectedSheets.Delete
Sheets("Sheet2").Select
ActiveWindow.SelectedSheets.Delete

I want to do this automatically without having to click on the
delete
dialogue box that appears.

Any ideas?

Thanks in advance,
Martin