Create/delete New worksheet

Catalin.B · #2 01-15-2012, 08:43 AM

add this line:

Code:

ThisWorkbook.Sheets.Add After:=Sheets(Sheets.Count)

or:

Code:

Worksheets.Add().Name = "MySheet"

or, if you want to add more than 1 sheet, use:

Code:

Worksheets.Add After:=Worksheets(Worksheets.Count), Count:=4

to delete a sheet use:
Sheets("Sheet1").delete
or:
ActiveSheet.delete
Make sure to turn off events if you do not want to see the confirmation pop-up message: (change back to true after you delete the sheet)

Code:

Application.DisplayAlerts = False

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Delete option greyed out when trying to delete row 1	tpcervelo	Excel	2	11-15-2011 06:48 AM
How to delete page not worksheet?	rec	Excel	6	05-20-2011 08:51 PM
delete email message via blackberry and have it delete on my pop3 and my outlook	Iamthestorm	Outlook	2	10-28-2010 12:21 AM
Can I use a formula to name a worksheet?	nolesca	Excel	3	06-07-2010 04:02 PM
Worksheet copying?	markg2	Excel	4	01-07-2010 10:08 AM