One way is to put code something like this in the Sheet code module.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveSheet.Name < "Sheet1" Then
ActiveSheet.Name = "Sheet1"
End If
End Sub




"Paul" wrote in message
...
I have a worksheet that is Protected, but it seems that users are still
able to change the name of the worksheet by double clicking on the tab
name. Is there a way to prevent users from changing the tab name when the
sheet is protected?

Thanks in advance,

Paul