Как удалить все кнопки или командные кнопки в Excel?

В этой статье объясняется, как удалить все кнопки элементов управления формой или командные кнопки с активного листа в Excel.

Удалите все кнопки, включая кнопки элементов управления формой и командные кнопки, выбрав их все.
Удалите все кнопки, включая кнопки элементов управления формой и командные кнопки, с помощью кода VBA.
Удалите все кнопки элементов управления формой или командные кнопки с помощью кода VBA.

Удалите все кнопки, включая кнопки элементов управления формой и командные кнопки, выбрав их все.

Пожалуйста, выполните следующие действия, чтобы удалить все кнопки (включая кнопки элементов управления формой и командные кнопки) с активного листа.

1. Включите режим конструктора, нажав Разработчик > Режим конструктора. См. скриншот:

2. Выберите одну из командных кнопок и нажмите клавиши Ctrl + A, чтобы выбрать все кнопки на текущем листе.

3. Нажмите клавишу Удалить, чтобы удалить все выбранные кнопки.

Примечание: Если на этом листе есть другие объекты, они также будут выбраны.

Удалите все кнопки, включая кнопки элементов управления формой и командные кнопки, с помощью кода VBA.

Кроме того, вы можете применить следующий сценарий VBA для удаления всех кнопок с текущего листа в Excel.

1. Откройте лист, содержащий кнопки, которые вы хотите удалить, а затем нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. В окне Microsoft Visual Basic for Applications нажмите Вставить > Модуль, затем скопируйте следующий код VBA в окно Кода.

Код VBA: Удалить все кнопки с активного листа

Sub Clear_ButtonsActiveSheet()
    Dim I As Long
    Dim xOLE As Object
    On Error Resume Next
    ActiveSheet.Buttons.Delete
    For Each xOLE In ActiveSheet.OLEObjects
        If TypeName(xOLE.Object) = "CommandButton" Then
            xOLE.Delete
        End If
    Next
End Sub

3. Нажмите клавишу F5, чтобы запустить код. Все кнопки, включая кнопки элементов управления формой и командные кнопки, немедленно удаляются с текущего листа.

Удалите все кнопки элементов управления формой или командные кнопки с помощью кода VBA.

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

1. Откройте лист, содержащий кнопки, которые вы хотите удалить, а затем нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. В окне Microsoft Visual Basic for Applications нажмите Вставить > Модуль, затем скопируйте следующий код VBA в окно Кода.

Код VBA: Удалить все кнопки элементов управления формой с активного листа

Sub Clear_ButtonsActiveSheet()
    ActiveSheet.Buttons.Delete
End Sub

Код VBA: Удалить все командные кнопки с активного листа

Sub Clear_ButtonsActiveSheet()
    Dim xOLE As Object
    On Error Resume Next
    For Each xOLE In ActiveSheet.OLEObjects
        If TypeName(xOLE.Object) = "CommandButton" Then
            xOLE.Delete
        End If
    Next
End Sub

3. Нажмите клавишу F5, чтобы запустить код.

Затем все кнопки элементов управления формой или все командные кнопки немедленно удаляются с текущего листа.

Связанные статьи:

• Как автоматически вставить пустую новую строку с помощью командной кнопки в Excel?
• Как использовать командную кнопку для сохранения активного листа как PDF файл в Excel?
• Как обновить или вставить (текущую) дату и время с помощью командной кнопки в Excel?
• Как использовать командную кнопку для изменения значения указанной ячейки в Excel?