Reference>TXLSShapes>Delete

Deletes all shapes from the collection.

Syntax

procedure Delete;

This example deletes all shapes from the shape collection on sheet one.

Workbook.Sheets[1].Shapes.Delete