禁用菜单栏部分功能

有些Excel的菜单栏上的某些选项按钮我们不想别人使用。
那我们可以禁用那些选项。
比如禁用调整“单元格格式”的选项。
代码如下:
 
1 Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
2 Application.CommandBars(“Worksheet Menu Bar”).Controls(“格式(O)”).Controls(“单元格(E)…”).Enabled = False
3 End Sub
如果要禁用其他功能,只要往代码下继续添加禁用代码。
如果需要恢复只要将值改成true。
其他的参考上述方法。
分享到:

5 条评论

点击这里取消回复。
注意: 评论者允许使用'@user空格'的方式将自己的评论通知另外评论者。例如, ABC是本文的评论者之一,则使用'@ABC '(不包括单引号)将会自动将您的评论发送给ABC。使用'@all ',将会将评论发送给之前所有其它评论者。请务必注意user必须和评论者名相匹配(大小写一致)。

昵称
  1. 婚纱摄影网站

    主题很有创意的按吗

    1. Kael.Z

      @ 婚纱摄影网站 : 呵呵,感谢!

  2. 海外置业

    博主你的博文不错啊,我会继续支持你的

  3. 小易

    哇 换主题了呀 🙂 新鲜哦~

    1. Kael.Z

      @ 小易 : 换个心情吧~ ❗