//create a new workbook var workbook = new GrapeCity.Documents.Excel.Workbook(); IWorksheet worksheet = workbook.Worksheets[0]; worksheet.Range["A1:B8"].Value = new object[,] { {"Day", "Rain (in.)"}, {1, 1}, {2, 0.8}, {3, 0.2}, {4, CalcError.NA}, {5, 0.6}, {6, 0.8}, {7, 0.8 } }; // Set style. worksheet.Range["A1:B1"].Interior.Color = System.Drawing.Color.FromArgb(142, 169, 219); worksheet.Range["A2:B8"].Interior.Color = System.Drawing.Color.FromArgb(217, 225, 242); worksheet.Range["A1:B8"].Borders.LineStyle = BorderLineStyle.Thin; // Add chart. Drawing.IShape shape = worksheet.Shapes.AddChart(Drawing.ChartType.Line, 150, 0, 250, 200); shape.Chart.SeriesCollection.Add(worksheet.Range["A1:B8"], Drawing.RowCol.Columns, true, true); // Set show blank as zero. shape.Chart.DisplayBlanksAs = DisplayBlanksAs.Zero; shape.Chart.ChartTitle.Text = "DisplayNaAsBlank:False"; // Copy the chart. worksheet.Range["D1:I14"].Copy(worksheet.Range["J1"]); // Set show #N/A as empty cell. shape.Chart.DisplayNaAsBlank = true; shape.Chart.ChartTitle.Text = "DisplayNaAsBlank:True"; // Save to an excel file workbook.Save("DisplayNaAsBlank.xlsx");
' Create a new Workbook Dim workbook As New Workbook Dim worksheet As IWorksheet = workbook.Worksheets(0) worksheet.Range("A1:B8").Value = New Object(,) { {"Day", "Rain (in.)"}, {1, 1}, {2, 0.8}, {3, 0.2}, {4, CalcError.NA}, {5, 0.6}, {6, 0.8}, {7, 0.8} } 'Set style. worksheet.Range("A1:B1").Interior.Color = System.Drawing.Color.FromArgb(142, 169, 219) worksheet.Range("A2:B8").Interior.Color = System.Drawing.Color.FromArgb(217, 225, 242) worksheet.Range("A1:B8").Borders.LineStyle = BorderLineStyle.Thin ' Add chart. Dim shape As Drawing.IShape = worksheet.Shapes.AddChart(Drawing.ChartType.Line, 150, 0, 250, 200) shape.Chart.SeriesCollection.Add(worksheet.Range("A1:B8"), Drawing.RowCol.Columns, True, True) ' Set show blank as zero. shape.Chart.DisplayBlanksAs = DisplayBlanksAs.Zero shape.Chart.ChartTitle.Text = "DisplayNaAsBlank:False" ' Copy the chart. worksheet.Range("D1:I14").Copy(worksheet.Range("J1")) ' Set show #N/A as empty cell. shape.Chart.DisplayNaAsBlank = True shape.Chart.ChartTitle.Text = "DisplayNaAsBlank:True" ' save to an excel file workbook.Save("DisplayNaAsBlank.xlsx")