//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.ColumnStacked100, 250, 20, 360, 230); worksheet.Range["A1:B6"].Value = new object[,] { { 1, 5 }, { 2, 4 }, { 3, 3 }, { 4, 2 }, { 5, 1 }, { 5, 3 }, }; shape.Chart.SeriesCollection.Add(worksheet.Range["A1:B6"], GrapeCity.Documents.Excel.Drawing.RowCol.Columns); shape.Chart.ChartTitle.Text = "Column Stacked 100 Chart"; // Save to an excel file workbook.Save("ColumnStacked100Chart.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.ColumnStacked100, 250, 20, 360, 230) worksheet.Range("A1:B6").Value = New Object(,) { {1, 5}, {2, 4}, {3, 3}, {4, 2}, {5, 1}, {5, 3} } shape.Chart.SeriesCollection.Add(worksheet.Range("A1:B6"), RowCol.Columns) shape.Chart.ChartTitle.Text = "Column Stacked 100 Chart" ' save to an excel file workbook.Save("ColumnStacked100Chart.xlsx")