**EPPlus supports adding 187 different types of shapes (defined by the [`eShapeStyle`]() enum) with multiple ways of formatting.** ### Example 1 - add a textbox ```csharp var shape = ws.Drawings.AddShape("txtDesc", eShapeStyle.Rect); shape.SetPosition(1, 5, 6, 5); //Position Row, RowOffsetPixels, Column, ColumnOffsetPixels shape.SetSize(400, 200); //Size in pixels shape.EditAs = eEditAs.Absolute; shape.Text = "This example demonstrates how to create various drawing objects like pictures, shapes and charts.\n\r\n\rThe first sheet contains all subdirectories and files with an icon, name, size and dates.\r\n\r\nThe second sheet contains statistics about extensions and the top-10 largest files."; shape.Fill.Style = eFillStyle.SolidFill; shape.Fill.Color = Color.DarkSlateGray; shape.Fill.Transparancy = 20; shape.TextAnchoring = eTextAnchoringType.Top; shape.TextVertical = eTextVerticalType.Horizontal; shape.TextAnchoringControl=false; shape.Effect.SetPresetShadow(ePresetExcelShadowType.OuterRight); shape.Effect.SetPresetGlow(ePresetExcelGlowType.Accent3_8Pt); ``` ```vbnet Dim shape = ws.Drawings.AddShape("txtDesc", eShapeStyle.Rect) shape.SetPosition(1, 5, 6, 5) 'Position Row, RowOffsetPixels, Column, ColumnOffsetPixels shape.SetSize(400, 200) 'Size in pixels shape.EditAs = eEditAs.Absolute shape.Text = "This example demonstrates how to create various drawing objects like pictures, shapes and charts." & vbLf & vbCr & vbLf & vbCr & "The first sheet contains all subdirectories and files with an icon, name, size and dates." & vbCrLf & vbCrLf & "The second sheet contains statistics about extensions and the top-10 largest files." shape.Fill.Style = eFillStyle.SolidFill shape.Fill.Color = Color.DarkSlateGray shape.Fill.Transparancy = 20 shape.TextAnchoring = eTextAnchoringType.Top shape.TextVertical = eTextVerticalType.Horizontal shape.TextAnchoringControl = False shape.Effect.SetPresetShadow(ePresetExcelShadowType.OuterRight) shape.Effect.SetPresetGlow(ePresetExcelGlowType.Accent3_8Pt) ``` ### Example 2 - add a smiley face ```csharp //Drawing with a pattern fill var shape = worksheet.Drawings.AddShape("PatternFill", eShapeStyle.SmileyFace); shape.SetPosition(0, 5, 4, 5); shape.SetSize(250, 250); shape.Fill.Style = eFillStyle.PatternFill; shape.Fill.PatternFill.PatternType = eFillPatternStyle.DiagBrick; shape.Fill.PatternFill.BackgroundColor.SetPresetColor(ePresetColor.Yellow); shape.Fill.PatternFill.ForegroundColor.SetSystemColor(eSystemColor.GrayText); shape.Border.Width = 2; shape.Border.Fill.Style = eFillStyle.SolidFill; shape.Border.Fill.SolidFill.Color.SetHslColor(90, 50, 25); shape.Font.Fill.Color = Color.Black; shape.Font.Bold = true; shape.Text = "Smiley With Pattern Fill"; ``` ```vbnet 'Drawing with a pattern fill Dim shape = worksheet.Drawings.AddShape("PatternFill", eShapeStyle.SmileyFace) shape.SetPosition(0, 5, 4, 5) shape.SetSize(250, 250) shape.Fill.Style = eFillStyle.PatternFill shape.Fill.PatternFill.PatternType = eFillPatternStyle.DiagBrick shape.Fill.PatternFill.BackgroundColor.SetPresetColor(ePresetColor.Yellow) shape.Fill.PatternFill.ForegroundColor.SetSystemColor(eSystemColor.GrayText) shape.Border.Width = 2 shape.Border.Fill.Style = eFillStyle.SolidFill shape.Border.Fill.SolidFill.Color.SetHslColor(90, 50, 25) shape.Font.Fill.Color = Color.Black shape.Font.Bold = True shape.Text = "Smiley With Pattern Fill" ``` ### Read existing shapes The `Drawings` collection can contain different types of objects (beside Shapes it might also contain [Pictures](), [Charts]() and [Form Controls]()).Here is how you can filter out the Shapes for a worksheet and cast them to the specialized `ExcelShape` type: ```csharp var shapes = worksheet.Drawings.Where(x => x.DrawingType == eDrawingType.Shape).Select(x => x.As.Shape); foreach(var shape in shapes) { var name = shape.Name; var shapeStyle = shape.Style; // etc } ``` ```vbnet Dim shapes = worksheet.Drawings.Where(Function(x) x.DrawingType = eDrawingType.Shape).Select(Function(x) x.As.Shape) For Each shape In shapes Dim name = shape.Name Dim shapeStyle = shape.Style ' etc Next ``` ### Re-arrange vertically As with any other `Drawing` you can use the `SendToBack` and `BringToFront` methods to adjust how a Shape is located vertically compared with other `Drawings`. ```csharp shape.BringToFront(); // or shape.SendToBack(); ``` ```vbnet shape.BringToFront() ' or shape.SendToBack() ``` ### Remove a Shape You can remove a shape from a worksheet via the `Drawings.Remove` method. ```csharp // remove by instance var itemToRemove = worksheet.Drawings.FirstOrDefault(x => x.Name == "myShape"); if(itemToRemove != null) { worksheet.Drawings.Remove(itemToRemove); } // remove by index worksheet.Drawings.Remove(0); // remove by name worksheet.Drawings.Remove("myShape"); ``` ```vbnet ' remove by instance Dim itemToRemove = worksheet.Drawings.FirstOrDefault(Function(x) x.Name = "myShape") If itemToRemove IsNot Nothing Then worksheet.Drawings.Remove(itemToRemove) End If ' remove by index worksheet.Drawings.Remove(0) ' remove by name worksheet.Drawings.Remove("myShape") ``` ### Manipulate Adjustment Points As of EPPlus 8, you can now manipulate adjustment points. Adjustment Points are the yellow dots as illustrated in the image below. Different shapes have a different amount of adjustment points, names and values. Values usually vary between 0 and 100000. ```csharp var arrow = worksheet.Drawings.AddShape("Arrow1", eShapeStyle.UpArrow); //Get available adjustment points. var adjustmentPointsNames = arrow.GetAdjustmentPointsNames(); //Set new adjustment point values. arrow.SetAdjustmentPoint(adjustmentPointsNames[0], 50000); arrow.SetAdjustmentPoint(adjustmentPointsNames[1], 32000); ``` ```vbnet Dim arrow = worksheet.Drawings.AddShape("Arrow1", eShapeStyle.UpArrow) 'Get available adjustment points. Dim adjustmentPointsNames = arrow.GetAdjustmentPointsNames() 'Set new adjustment point values. arrow.SetAdjustmentPoint(adjustmentPointsNames(0), 50000) arrow.SetAdjustmentPoint(adjustmentPointsNames(1), 32000) ``` ## See also [Sample 5.1 (C\#)]() or [Sample 5.1 (VB)]()