CommandBar.Delete 方法 (Office)

从集合中删除 CommandBar 对象。

注意

某些 Microsoft Office 应用程序中对 CommandBars 的使用已由 Microsoft Office Fluent 用户界面的新功能区组件取代。 有关详细信息，请参阅 Office Fluent 功能区概述。

语法

表达式。删除

expression 是必需的。 一个代表 CommandBar 对象的变量。

备注

对于 Scripts 集合，使用 Delete 方法从指定的 Microsoft Word 文档、Excel 工作表或 PowerPoint 幻灯片中删除所有脚本。 在宿主应用程序中，脚本定位标记以形状表示。 因此，与每个 msoScriptAnchor 类型的脚本定位标记相关联的 Shape 对象将从 Excel 和 PowerPoint 的 Shapes 集合以及 Word 的 InlineShapes 和 Shapes 集合中删除。

示例

本示例删除所有不可见的自定义命令栏。

foundFlag = False  
delBars = 0 
For Each bar In CommandBars 
    If (bar.BuiltIn = False) And _ 
    (bar.Visible = False) Then 
        bar.Delete 
        foundFlag = True
        delBars = delBars + 1 
    End If 
Next bar 
If Not foundFlag Then 
    MsgBox "No command bars have been deleted." 
Else 
    MsgBox delBars & " custom bar(s) deleted." 
End If

另请参阅

• CommandBar 对象成员

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。