Disable delete sheet in Excel 2010

[SteveRMS]

In Excel 2003, I had a macro that disabled the delete sheet command. I've recently upgraded to Excel 2010 and the old macro doesn't work any more.

Application.CommandBars("Worksheet Menu Bar").Controls("Edit") _
.Controls("Delete Sheet").Enabled = False

Any suggestions on how to do this in Excel 2010?

I'd also like to disable the rename command.

In fact, I'd like to disable the right-click menu on the sheet tab too.

[mikerickson]

Disabling the Right Click menu is simple enough. Just put this code the the ThisWorkbook code module

Please Login or Register  to view this content.

[SteveRMS]

Thanks Mike,
I copied your code and pasted it into the This Workbook module but it didn't make any difference. I still get the right click menu.
What am I missing? Do I need to change the arguments in the brackets in the subroutine?
Regards,
Steve

[mikerickson]

I misread the requirements. The code I posted disables right clicking on a cell, not on a sheet tab.