У меня есть лист Excel, где макрос, привязанный к кнопке, рисует динамические фигуры на основе пользовательских параметров ввода в листе.

Я пытаюсь написать новый макрос для очистки листа или другими словами удалить все фигуры на листе.

Я попытался использовать приведенный ниже код, и он действительно удаляет все фигуры, однако кнопки управления формы также удаляются в процессе. Есть ли простой способ избавиться от фигур (стрелок, текстовых полей, эллипсов и т. Д.) Только на листе? Огромное спасибо!!!

Sub DeleteAllShapes()

Dim Shp As Shape

For Each Shp In ActiveSheet.Shapes
    Shp.Delete
Next Shp

End Sub