Метод 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 и обратная связь.