Disable copy of worksheets and renaming of certain sheets

Hi guys,

A- Is there a way to disable the copy of any worksheet in a workbook? As in via the right click Move or Copy option. I am OK with moving just not copying it.

B - Is there a way to disable to move and copy function for a select group of sheets (4 sheets in total)?

C- Also is there a way to disable the renaming of selected worksheets (4 Sheets in total)?

Thank you.

You can use workbook protection to protect the structure of a workbook. See the MSFT docs for details.

Yes, I am aware, but I want to be able to rename or move some sheets.

OK,
so I seem to have found a way to protect the sheet name on selected sheets using the code below.

Just paste it into the relevant sheet and change "Master" to suit your needs.

It will allow you to type in a new name on the sheet, but as soon as you click on the sheet it reverts back to the desired name.

If you can think of a better way, then by all means please share.

PS: Still looking to disable the "copy sheet"?

Private Sub worksheet_SelectionChange(ByVal Target As Excel.Range)
'Updateby Extendoffice
If ActiveSheet.Name <> "Master" Then
ActiveSheet.Name = "Master"
End If
End Sub

Depends on the cleverness of one's users. Open a different workbook and run a macro including the statement

Application.EnableEvents = False

and your event handlers won't do anything.

If you mean prohibit copying worksheets into other workbooks, you may need to look into DRM.