Add 方法 (Microsoft Word)

在 Microsoft Word 中，通常忽略 Add 方法的 Temporary 参数（CommandBarControls 对象）。因此，在向命令栏上的菜单栏添加控件按钮时，它将保留在 Normal.dot 模板中，无论是否将 Temporary 参数设置为 True。要从 Normal.dot 模板中删除不需要的菜单项，可以使用下列方法之一。

1. 删除 Normal.dot。该方法要求 Word 重新创建 Normal 默认模板，这还将删除对 Normal 模板所进行的任何其他更改，例如工具栏。由于所有 Word 文档均依赖于 Normal 模板，因此需要手动而不是自动删除模板。
2. 重置命令栏。可以创建一个过程重置所有命令栏或指定命令栏。本示例重置所有命令栏，包括菜单栏和工具栏。

   Sub ResetAllCommandBars()
       Dim mnu As CommandBar
   
       'Error handler skips over custom toolbars,
       'which can't be reset
       On Error Resume Next
   
       For Each mnu In Application.CommandBars
           mnu.Reset
       Next mnu
   End Sub

   本示例仅重置 Word 中菜单栏上的项而不是所有工具栏。

   Sub ResetMenuBar()
       Dim mnu As CommandBar
       For Each mnu In Application.CommandBars
           If mnu.Name = "Menu Bar" Then
               mnu.Reset
           End If
       Next mnu
   End Sub