Vô hiệu hóa menu chuột phải trên tab tên sheet trên Excel 2019

[titanic20072007]

Mình có một số sheet không muốn mọi người đổi tên (ảnh hướng đến code) mình làm mờ đi trên excel 2003 thì được nhưng sang excel 2010 trở lên thì nó không có tác dụng. VD làm mờ lệnh Rename: ThisWorkbook.Application.CommandBars("ply").Controls("Rename").Enabled = False nhờ các bạn chỉ giúp.

 

[snow25]

Mình có một số sheet không muốn mọi người đổi tên (ảnh hướng đến code) mình làm mờ đi trên excel 2003 thì được nhưng sang excel 2010 trở lên thì nó không có tác dụng. VD làm mờ lệnh Rename: ThisWorkbook.Application.CommandBars("ply").Controls("Rename").Enabled = False nhờ các bạn chỉ giúp.

Khóa worbook lại là xong.

 

[Doãn Quốc Bình]

Mình có một số sheet không muốn mọi người đổi tên (ảnh hướng đến code) mình làm mờ đi trên excel 2003 thì được nhưng sang excel 2010 trở lên thì nó không có tác dụng. VD làm mờ lệnh Rename: ThisWorkbook.Application.CommandBars("ply").Controls("Rename").Enabled = False nhờ các bạn chỉ giúp.

Bạn dùng code sau:

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