//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, 250, 20, 360, 230); worksheet.Range["A1:C6"].Value = new object[,] { { null, "S1", "S2"}, { "Item1", 10, 25}, { "Item2", -51, -36}, { "Item3", 32, 64}, { "Item4", 44, 80}, { "Item5", 60,100} }; shape.Chart.SeriesCollection.Add(worksheet.Range["A1:D6"], GrapeCity.Documents.Excel.Drawing.RowCol.Columns, true, true); GrapeCity.Documents.Excel.Drawing.ISeries series2 = shape.Chart.SeriesCollection[1]; //add a secondary axis series2.AxisGroup = GrapeCity.Documents.Excel.Drawing.AxisGroup.Secondary; series2.ChartType = GrapeCity.Documents.Excel.Drawing.ChartType.Line; // Save to an excel file workbook.Save("CreateSecondaryAxis.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.ColumnClustered, 250, 20, 360, 230) worksheet.Range("A1:C6").Value = New Object(,) { {Nothing, "S1", "S2"}, {"Item1", 10, 25}, {"Item2", -51, -36}, {"Item3", 32, 64}, {"Item4", 44, 80}, {"Item5", 60, 100} } shape.Chart.SeriesCollection.Add(worksheet.Range("A1:D6"), RowCol.Columns, True, True) Dim series2 As ISeries = shape.Chart.SeriesCollection(1) 'add a secondary axis series2.AxisGroup = AxisGroup.Secondary series2.ChartType = ChartType.Line ' save to an excel file workbook.Save("CreateSecondaryAxis.xlsx")