如何删除自定义菜单

baomaboy · 发表于 2011-8-3 13:34

删除xlb 就是复原菜单，如果你想既想保留菜单设置，又想删除“自定义菜单”的话，好像只有先知道“自定义菜单”的名称吧。

baomaboy · 发表于 2011-8-3 13:39

我16楼原话就是机率很小，小不等同于没有，所以当代码被别人拿来就用而出现问题时就要耗时查看分析，那么写代码时多考虑一步不是比出错了在去查简单多了吗

opelwang · 发表于 2011-8-3 18:39

原帖由 baomaboy 于 2011-8-3 13:34 发表
删除xlb 就是复原菜单，如果你想既想保留菜单设置，又想删除“自定义菜单”的话，好像只有先知道“自定义菜单”的名称吧。

这样的话，是否可以考虑逆向思维，就是说如果菜单的名字不等于默认的那几个的话，就执行删除动作？

...

baomaboy · 发表于 2011-8-3 20:31

是的，本来我想加上“如果菜单的名字不等于默认的那几个的话，就执行删除动作？”这句的，又闲自己啰嗦才没加。

opelwang · 发表于 2011-8-3 21:04

不会写呀,,,,哪位仁兄，帮忙写这段代码？谢谢~

unsamesky · 发表于 2011-8-3 22:41

原帖由 baomaboy 于 2011-8-3 13:34 发表
删除xlb 就是复原菜单，如果你想既想保留菜单设置，又想删除“自定义菜单”的话，好像只有先知道“自定义菜单”的名称吧。

对于系统菜单，直接用Reset还原。
例如，楼主在一楼遇到的问题，可以用如下代码删除非默认菜单。
sub TT()
Application.COmmandbars("Worksheet Menu Bar").Reset
ENd sub

opelwang · 发表于 2011-8-3 23:00

好方法，学习了，测试结果后回复,,,,
非常感谢指点~~~

Excelzhjg1 · 发表于 2011-8-4 15:40

原帖由 jiminyanyan 于 2011-8-2 22:43 发表
删除C:\Documents and Settings\Administrator\Application Data\Microsoft\Excel\Excel12.xlb
2003的是Excel11.xlb

路过，看看。

baomaboy · 发表于 2011-8-7 11:58

原帖由 opelwang 于 2011-8-2 22:54 发表

没有文件了,,,,就是下载了一个示例文件，执行了下，就删除了。
再启动就有这个菜单了...
对了，仁兄，用了你的那个加载宏清理工具，里面也是空空的，没有提示有这一项...

添加了查找.xlb文件的功能，另外添加了几个已知恶意模板的查找和提示。
http://club.excelhome.net/thread-727017-1-1.html

opelwang · 发表于 2011-8-7 12:19

感谢baomaboy兄分享，下载试用。

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

[求助] 如何删除自定义菜单