Macro for sheet delete, very easy
 

my code is:
Sheets("Sheet 1 (2)").Select
ActiveWindow.SelectedSheets.Delete

How can i hace it delete the seleted sheet, not always 'Sheet 1 (2)'?


--
comotoman
------------------------------------------------------------------------
comotoman's Profile: http://www.excelforum.com/member.php...o&userid=27292
View this thread: http://www.excelforum.com/showthread...hreadid=475211

This code deletes the active sheet, with no prompt for confirmation:

Application.DisplayAlerts = False
ActiveWindow.SelectedSheets.Delete