Application.DisplayAlerts = False
Application.ActiveWorkbook.Sheets(3).Delete
Application.DisplayAlerts = True

--

Regards,

Peo Sjoblom

wrote in message
...
How do I delete a worksheet without getting the confirmation message:
"Are you sure you wish to delete this worksheet?"

Application.ActiveWorkbook.Sheets(3).Delete


Lance