vba to select all autoshapes on a sheet

[chris_culley]

Hi guys,

is there a way to select all the autoshapes on a sheet in vba? At the
minute I'm looping an iterator and concatenating onto the word
"autoshape", deleting "autoshape 1", "autoshape 2", "autoshape 3"...

this is horribly inefficient and besides, stops working when a shape
has a name like "oval 5760"! I want to select all the shapes, and
delete them all in one go...


Many thanks

Chris

 

[moon]

ActiveSheet.Shapes.SelectAll

 

[chris_culley]

d'oh... that's really simple!

Thanks Moon

ActiveSheet.Shapes.SelectAll