Count property

Devuelve el número total de formas de la colección de la hoja de cálculo

Count := Workbook.Sheets[1].Shapes.Count;