//create a new workbook var workbook = new GrapeCity.Documents.Excel.Workbook(); IWorksheet worksheet = workbook.Worksheets[0]; //Create shape GrapeCity.Documents.Excel.Drawing.IShape shape = worksheet.Shapes.AddShape(GrapeCity.Documents.Excel.Drawing.AutoShapeType.Rectangle, 50, 50, 200, 200); //Duplicate shape GrapeCity.Documents.Excel.Drawing.IShape newShape = shape.Duplicate(); // Save to an excel file workbook.Save("ShapeDuplicate.xlsx");
' Create a new Workbook Dim workbook As New Workbook Dim worksheet As IWorksheet = workbook.Worksheets(0) 'Create shape Dim shape As IShape = worksheet.Shapes.AddShape(AutoShapeType.Rectangle, 50, 50, 200, 200) 'Duplicate shape Dim newShape As IShape = shape.Duplicate() ' save to an excel file workbook.Save("ShapeDuplicate.xlsx")