在WORD的系统菜单中插入自己的菜单，不是将WORD中原有的菜单全部替换掉。

Question

在WORD的系统菜单中插入自己的菜单，不是将WORD中原有的菜单全部替换掉。能否做到？

Answer 1

使用了CommandBars.Add(Name:="demo Menu", MenuBar:=True, temporary:=True)
方法，但将WORD中原有的菜单全部去掉了，只剩下了字定义的菜单，现在只是想在原有菜单中插入一个自己的菜单。
请赐教！

Answer 2

上述代码不可能把word的菜单全隐藏的吧，肯定还有其他代码执行了如下添加自定义的菜单Set cbmCommandBarMenu = Application.CommandBars("Menu Bar")
        ' 添加菜单
        With cbmCommandBarMenu.Controls
            Set cbmDemoMenu = _
                 .Add(Type:=msoControlPopup, Before:=11)

Answer 3

CommandBars.Add(Name:="demo Menu", MenuBar:=True, temporary:=True)
并没有把原来的菜单去掉啊，只是隐藏了，你可以把他们显示出来啊