Return to VBA Code Examples

VBA – Delete All Autoshapes

Written by

Editorial Team

Reviewed by

Steve Rynearson

Last updated on July 19, 2021

Delete all Autoshapes From a Worksheet

The following is a Macro to loop through all Autoshapes on a given worksheet and delete them.

delete autoshapes


Sub DeleteAllShapes()

Dim GetShape As Shape

    For Each GetShape In ActiveSheet.Shapes

End Sub

VBA Coding Made Easy

Stop searching for VBA code online. Learn more about AutoMacro – A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!

alt text


Learn More!

<<Return to VBA Examples


VBA Code Examples Add-in

Easily access all of the code examples found on our site.

Simply navigate to the menu, click, and the code will be inserted directly into your module. .xlam add-in.

(No installation required!)

Free Download

Return to VBA Code Examples