//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.ColumnClustered, 20, 20, 360, 230); worksheet.Range["A20:D21"].Value = new object[,] { { 100,200,300,400 }, { 100,200,300,400 }, }; shape.Chart.SeriesCollection.Add(worksheet.Range["A20:D21"], GrapeCity.Documents.Excel.Drawing.RowCol.Columns); shape.Chart.ChartTitle.Text = "Column Clustered Chart"; // Save to a pdf file workbook.Save("ColumnChartPdf.pdf");
' Create a new Workbook Dim workbook As New Workbook Dim worksheet As IWorksheet = workbook.Worksheets(0) Dim shape As IShape = worksheet.Shapes.AddChart(ChartType.ColumnClustered, 20, 20, 360, 230) worksheet.Range("A20:D21").Value = New Object(,) { {100, 200, 300, 400}, {100, 200, 300, 400} } shape.Chart.SeriesCollection.Add(worksheet.Range("A20:D21"), RowCol.Columns) shape.Chart.ChartTitle.Text = "Column Clustered Chart" ' save to a pdf file workbook.Save("ColumnChartPdf.pdf")