//create a new workbook var workbook = new GrapeCity.Documents.Excel.Workbook(); IWorksheet worksheet = workbook.Worksheets[0]; GrapeCity.Documents.Excel.Drawing.IShape shape = worksheet.Shapes.AddChart(GrapeCity.Documents.Excel.Drawing.ChartType.Doughnut, 250, 20, 360, 230); worksheet.Range["A1:B6"].Value = new object[,] { {"S1" , "S2"}, {10 , 25 }, {51 , 36 }, {52 , 85 }, {22 , 65 }, {23 , 69 }, }; shape.Chart.SeriesCollection.Add(worksheet.Range["A1:B6"], GrapeCity.Documents.Excel.Drawing.RowCol.Columns); shape.Chart.ChartTitle.Text = "Doughnut Chart"; shape.Chart.ChartGroups[0].DoughnutHoleSize = 50; shape.Chart.SeriesCollection[0].HasDataLabels = true; shape.Chart.SeriesCollection[1].HasDataLabels = true; shape.Chart.SeriesCollection[1].Explosion = 2; // Save to an excel file workbook.Save("Pie_DoughnutChart.xlsx");
' Create a new Workbook Dim workbook As New Workbook Dim worksheet As IWorksheet = workbook.Worksheets(0) Dim shape As IShape = worksheet.Shapes.AddChart(ChartType.Doughnut, 250, 20, 360, 230) worksheet.Range("A1:B6").Value = New Object(,) { {"S1", "S2"}, {10, 25}, {51, 36}, {52, 85}, {22, 65}, {23, 69} } shape.Chart.SeriesCollection.Add(worksheet.Range("A1:B6"), RowCol.Columns) shape.Chart.ChartTitle.Text = "Doughnut Chart" shape.Chart.ChartGroups(0).DoughnutHoleSize = 50 shape.Chart.SeriesCollection(0).HasDataLabels = True shape.Chart.SeriesCollection(1).HasDataLabels = True shape.Chart.SeriesCollection(1).Explosion = 2 ' save to an excel file workbook.Save("Pie_DoughnutChart.xlsx")