hi,
Try with
Sub test()
Application.DisplayAlerts = False
Sheets("sheet1").Delete
Application.DisplayAlerts = True
End Sub
Rgds,
vobiscu
--
Vobiscu
-----------------------------------------------------------------------
Vobiscum's Profile:
http://www.msusenet.com/member.php?userid=245
View this thread:
http://www.msusenet.com/t-187056730