VBAで、エクセルワークシート上の図を選択・削除したい

質問

VBAで、ワークシート上の図をすべて選択して削除するのは、どのように書いたら良いでしょうか？実際の図は一つなのですが、オートマクロで記述すると、
ActiveSheet.Shapes.Range(Array("Picture 3").Select　のように、番号が変わってしまいます。

回答No.1

n-jun · ベストアンサー

Dim c As Excel.Shape

For Each c In ActiveSheet.Shapes
c.Delete
Next

とか？

お礼

ありがとうございました。できました。