怎样使用VBA禁用右键菜单？

1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码，然后运行

Sub禁用()

Dim i As Byte, j
j=Application.CommandBars("cell").Controls.Count
For i=j-3 To j
Application.CommandBars("cell").Controls(i).Enabled=False
Next i
End Sub
Sub启用()
Dim i As Byte,j
j=Application.CommandBars("cell").Controls.Count
For i=j-3 To j
Application.CommandBars("cell").Controls(i).Enabled=True
Next i
End Sub

5、在禁用后三项时可能看不到与禁用前有何差异，这是因为Excel右键有很多隐藏菜单，需要选中某些特定内容才显示出来，而选择单元格时是看不到后三个菜单的