deleting sheet protection

[VK]

Hi people!

I want prevent of deleteing sheets I originally have.
I have a Macro who add a new sheet, which must be deleteable.
OK. I know how to protect whole Workbook, but it's not what I need ,because
I can't add new worksheet. (delete too)



Any help!

Vlado

 

[VK]

Another thing:

New sheets from macro are colored:
..........ActiveWorkbook.ActiveSheet.Tab.ColorIndex = 34
Maybe is possible to disable >Delete< in relation of tab color.
Something like.

If ActiveSheet.Tab.ColorIndex <> 34 then disable Delete

Is that possible?

 

[Tom Ogilvy]

In you code,
unprotect the workbook, add the sheet, reprotect the workbook.

 

[VK]

Tom,

This would be good option but, problem is this new sheets must be daleteable
for user.
I don't know how manage that.

 

[Tom Ogilvy]

Provide an interface for the user, such as a menu item or command button
that executes your code that deletes the sheet.