Return to VBA Code Examples

VBA – Delete All Autoshapes

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