[已解决]word退出本文件时，不能删除菜单

yjwdjfqb · 发表于 2013-12-27 22:03

word退出本文件时，不能删除菜单

我设置了，退出当前文件时，删除自定义的菜单

但我关闭当前文件时，打开其它文件也要显示，自定义的菜单

求助：改成，退出当前文件时，同时删除自定义的菜单。

word退出本文件时，不能删除菜单.rar (7.76 KB, 下载次数: 3)

hwc2ycy · 发表于 2013-12-27 22:39

Private Sub Document_Close()
On Error Resume Next
Application.CommandBars("Menu Bar").Delete
End Sub

复制代码

hwc2ycy · 发表于 2013-12-27 22:40

Private Sub Document_Close()
On Error Resume Next
'Application.CommandBars("Menu Bar").Delete
Call auto_close
End Sub

复制代码

hwc2ycy · 发表于 2013-12-27 22:41

或者创建菜单项时，指定最后一个参数为TRUE
CommandBars.Add 方法
表达式.Add(Name, Position, MenuBar, Temporary)

Temporary 可选 Variant 如果为 True，则将使新命令栏变成临时命令栏。临时命令栏将在容器应用程序关闭时删除。默认值为 False。

yjwdjfqb · 发表于 2013-12-27 22:42

hwc2ycy 发表于 2013-12-27 22:39

版主你好，我这儿把代码加进去还是不行呀！

麻烦老师把你那儿测试成功的附件给我发个好吧，谢谢你了老师！

hwc2ycy · 发表于 2013-12-28 00:05

这个最佳答案由 hwc2ycy 给出，感谢 hwc2ycy 的回答。

单击隐藏图章

yjwdjfqb 发表于 2013-12-27 22:42
版主你好，我这儿把代码加进去还是不行呀！

麻烦老师把你那儿测试成功的附件给我发个好吧，谢谢你了老 ...

word退出本文件时，不能删除菜单.rar (12.44 KB, 下载次数: 10)

yjwdjfqb · 发表于 2013-12-28 09:02

hwc2ycy 发表于 2013-12-28 00:05

辛苦老师了，这么晚，还在帮助我们这些菜鸟,真的很感谢老师！

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

[已解决]word退出本文件时，不能删除菜单

评分

评分