Поделиться через


Метод CommandBar.Delete (Office)

Удаляет объект CommandBar из коллекции.

Примечание.

Использование CommandBars в некоторых приложениях Microsoft Office было заменено новым компонентом ленты пользовательского интерфейса Microsoft Office Fluent. Дополнительные сведения см. в статье Обзор ленты Office Fluent.

Синтаксис

expression. Удалить

выражение (обязательно). Переменная, представляющая объект CommandBar .

Замечания

Для коллекции Scripts с помощью метода Delete удаляются все скрипты из указанного документа Microsoft Word, листа Excel или слайда PowerPoint. Привязка скрипта представлена фигурой в ведущем приложении. Таким образом, объект Shape , связанный с каждой привязкой скрипта типа msoScriptAnchor , удаляется из коллекции Shapes в Excel и PowerPoint, а также из коллекций InlineShapes и Shapes в Word.

Пример

В этом примере удаляются все пользовательские панели команд, которые не отображаются.

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

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.