Thanks for that, it works well.

The only thing is it leaves the first three worksheets, Sheet1, Sheet
and Sheet3 in the workbook. I have tried to add some code so they ar
deleted but it keeps asking me to confirm the delete.

Is there a way to stop this confirmation box appearing?

The code I have entered is simply been produced by recording th
deletion of the three sheets.

-Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
Sheets("Sheet3").Activate
ActiveWindow.SelectedSheets.Delete

--
hungledin
-----------------------------------------------------------------------
hungledink's Profile: http://www.officehelp.in/member.php?userid=556
View this thread: http://www.officehelp.in/showthread.php?t=128881

Posted from - http://www.officehelp.i