Using fileStream = IO.File.Create("C:\temp\exceltest.xlsx") Using excelFile As New ExcelPackage(fileStream) Using sheet = excelFile.Workbook.Worksheets.Add("MySheet1") Using shape = sheet.Drawings.AddShape("円", eShapeStyle.Ellipse) shape.SetPosition(3, 0, 3, 0) shape.SetSize(400, 400) shape.Border.Fill.Color = Color.Blue shape.Border.Width = 20 shape.Fill.Color = Color.Transparent excelFile.Save() End Using End Using End Using End Using