//create a new workbook var workbook = new GrapeCity.Documents.Excel.Workbook(); var worksheet = workbook.ActiveSheet; worksheet.Range["A1"].Value = "Sales by Country"; worksheet.Range["A2:F5"].Value = new object[,] { {"Countries",2016,2017,2018,2019,2020}, {"China",243000,291000,465000,282000,213000}, {"India",448000,358000,332000,489000,302000}, {"UnitedStates",439000,276000,413000,396000,392000} }; worksheet.Range["G2"].Value = "SparkLine"; worksheet.Range["G3:G5"].Formula = "=LINESPARKLINE(B3:F3,1,,,\"{showMarkers:TRUE,lineWeight:1.5,markersColor:#7030a0}\")"; worksheet.Range["A1:G1"].Merge(); worksheet.Range["A1"].Interior.Color = System.Drawing.Color.Purple; worksheet.Range["A1"].Font.Color = System.Drawing.Color.White; worksheet.Range["A1"].HorizontalAlignment = HorizontalAlignment.Center; worksheet.Range["A1:G5"].Borders.LineStyle = BorderLineStyle.Thin; worksheet.Range["B3:F5"].NumberFormat = "$#,##0"; worksheet.Range["A1:G2"].Font.Bold = true; worksheet.Range["A1"].Font.Size = 15; worksheet.Range["A2:G5"].Font.Size = 13; worksheet.Range["A:F"].AutoFit(); worksheet.Range["1:5"].RowHeight = 25; worksheet.Range["G1"].ColumnWidth = 30; worksheet.PageSetup.Orientation = PageOrientation.Landscape; // Save to a pdf file workbook.Save("LineSparkline.pdf");
' Create a new Workbook Dim workbook As New Workbook Dim worksheet = workbook.ActiveSheet worksheet.Range("A1").Value = "Sales by Country" worksheet.Range("A2:F5").Value = New Object(,) { {"Countries", 2016, 2017, 2018, 2019, 2020}, {"China", 243000, 291000, 465000, 282000, 213000}, {"India", 448000, 358000, 332000, 489000, 302000}, {"UnitedStates", 439000, 276000, 413000, 396000, 392000} } worksheet.Range("G2").Value = "SparkLine" worksheet.Range("G3:G5").Formula = "=LINESPARKLINE(B3:F3,1,,,""{showMarkers:TRUE,lineWeight:1.5,markersColor:#7030a0}"")" worksheet.Range("A1:G1").Merge() worksheet.Range("A1").Interior.Color = System.Drawing.Color.Purple worksheet.Range("A1").Font.Color = System.Drawing.Color.White worksheet.Range("A1").HorizontalAlignment = HorizontalAlignment.Center worksheet.Range("A1:G5").Borders.LineStyle = BorderLineStyle.Thin worksheet.Range("B3:F5").NumberFormat = "$#,##0" worksheet.Range("A1:G2").Font.Bold = True worksheet.Range("A1").Font.Size = 15 worksheet.Range("A2:G5").Font.Size = 13 worksheet.Range("A:F").AutoFit() worksheet.Range("1:5").RowHeight = 25 worksheet.Range("G1").ColumnWidth = 30 worksheet.PageSetup.Orientation = PageOrientation.Landscape ' save to a pdf file workbook.Save("LineSparkline.pdf")