如何让宏菜单呈灰色?

kezhiye · 发表于 2007-3-8 22:25

拜求哪位帮写一段VBA代码,功能是启用宏后使"工具"菜单的"宏"下的"宏(M)"和"Visual Basic编辑器(V)"两个子菜单呈灰色,也就是用户无法操作这两个子菜单.

谢谢!

yuanzhuping · 发表于 2007-3-8 22:28

Application.CommandBars(1).Controls("工具(&T)").Controls("宏(&M)").Enabled = False

sjzhouah · 发表于 2007-3-8 22:30

Application.CommandBars("Visual basic").Visible = False

sjzhouah · 发表于 2007-3-8 22:32

变灰色应该是这样,上面那句变没了:Application.CommandBars("Visual basic").Enabled = False

kezhiye · 发表于 2007-3-9 08:28

谢谢各位

kezhiye · 发表于 2007-3-9 09:14

我试了一下,上面的可以让菜单变灰,但按Alt+F11快捷键依然可以打开VBA编辑器

yuanzhuping · 发表于 2007-3-9 10:01

QUOTE:

以下是引用kezhiye在2007-3-9 9:14:56的发言：

我试了一下,上面的可以让菜单变灰,但按Alt+F11快捷键依然可以打开VBA编辑器

可以设置VBA密码进行保护,也可以屏蔽Alt+F11快捷键.

kezhiye · 发表于 2007-3-9 12:33

设置VBA密码保护存在退出时要求输入VBA密码的问题,请问如何屏蔽Alt+F11快捷键?

titita · 发表于 2008-8-31 22:01

帮忙顶一下，

请问如何屏蔽Alt+F11快捷键?

yuanzhuping · 发表于 2008-8-31 23:25

QUOTE:

以下是引用titita在2008-8-31 22:01:17的发言：

帮忙顶一下，

请问如何屏蔽Alt+F11快捷键?

Application.OnKey "%{F11}", ""

		自动登录	找回密码
密码			免费注册

[求助] 如何让宏菜单呈灰色?