我正在尝试禁用(或隐藏)Excel工作表/标签菜单上的特定右键单击选项。我不想禁用整个菜单per this thread。
我在Excel 2010和2016中都尝试过,结果相同。该代码运行正常,但工作表右键单击菜单中的选项仍处于启用状态。我尝试使用控件的名称和ID无济于事。
Private Sub Worksheet_Activate()
Application.CommandBars("cell").Controls("cut").Enabled = False 'Works
With Application.CommandBars("Ply")
.Controls("Insert...").Enabled = False
.Controls("&Select All Sheets").Enabled = False
.Controls("Select All Sheets").Enabled = False
.FindControl(ID:=946).Enabled = False '&Select All Sheets ID:946
'.Enabled = False 'Works but don't want entire menu disabled
End With
End Sub
代码后,选项仍处于启用状态:
谢谢。