try this:

Application.ScreenUpdating = False
....
....

Worksheets("tempSheet").Visible = False



This will not delete the temp worksheet, but you can reuse it

--
Message posted from http://www.ExcelForum.com