Not needing to have Microsoft Excel installed on the machine, The Spire.DataExport can create Excel spreadsheet.
private void btnRun_Click(object sender, System.EventArgs e) { oleDbConnection1.Open(); try { cellExport1.SaveToFile(); } finally { this.oleDbConnection1.Close(); } } private void Form1_Load(object sender, System.EventArgs e) { LoadData(); } private void button2_Click(object sender, System.EventArgs e) { LoadData(); } private void btnAbout_Click(object sender, System.EventArgs e) { Close(); } private void button1_Click(object sender, System.EventArgs e) { oleDbConnection1.Open(); try { cellExport2.SaveToFile(); } finally { this.oleDbConnection1.Close(); } } private void button3_Click(object sender, System.EventArgs e) { oleDbConnection1.Open(); try { cellExport3.SaveToFile(); } finally { this.oleDbConnection1.Close(); } } private void button4_Click(object sender, System.EventArgs e) { oleDbConnection1.Open(); try { cellExport4.SaveToFile(); } finally { this.oleDbConnection1.Close(); } } private void button5_Click(object sender, System.EventArgs e) { ushort currentRow = 1; string currentFormula = string.Empty; Cell cell = null; cellExport5.Cells.Clear(); cellExport5.SetColumnWidth(1, 32); cellExport5.SetColumnWidth(2, 16); cellExport5.SetColumnWidth(3, 16); cell = cellExport5.AddString(1,currentRow++,"Examples of formulas :"); cell.Format.Font.Bold = true; cell.Format.FillStyle.Background = CellColor.LightGreen; cell.Format.FillStyle.Pattern = Pattern.Solid; cell.Format.Borders.Bottom.Style = CellBorderStyle.Medium; cell = cellExport5.AddString(1,++currentRow,"Test data:"); cell.Format.Font.Bold = true; cell.Format.FillStyle.Background = CellColor.LightGreen; cell.Format.FillStyle.Pattern = Pattern.Solid; cell.Format.Borders.Bottom.Style = CellBorderStyle.Medium; //test data cellExport5.AddNumeric(2,currentRow, 7.3); cellExport5.AddNumeric(3,currentRow,5); cellExport5.AddNumeric(4,currentRow,8.2); cellExport5.AddNumeric(5,currentRow, 4); cellExport5.AddNumeric(6,currentRow, 3); cellExport5.AddNumeric(7,currentRow++, 11.3); cell = cellExport5.AddString(1,++currentRow, "Formulas"); cell.Format.Font.Bold = true; cell.Format.FillStyle.Background = CellColor.LightGreen; cell.Format.FillStyle.Pattern = Pattern.Solid; cell.Format.Borders.Bottom.Style = CellBorderStyle.Medium; cell = cellExport5.AddString(2,currentRow, "Results"); cell.Format.Font.Bold = true; cell.Format.FillStyle.Background = CellColor.LightGreen; cell.Format.FillStyle.Pattern = Pattern.Solid; cell.Format.Borders.Bottom.Style = CellBorderStyle.Medium; //str. currentFormula = "=\"hello\""; cellExport5.AddString(1, ++currentRow, currentFormula); cellExport5.AddFormula(2, currentRow, "=\"hello\""); cellExport5.AddFormula(3, currentRow, "=\"" + new string(new char[]{'\u4f60', '\u597d'})+ "\""); //int. currentFormula = "=300"; cellExport5.AddString(1, ++currentRow,currentFormula); cellExport5.AddFormula(2,currentRow, currentFormula); // float currentFormula = "=3389.639421"; cellExport5.AddString(1, ++currentRow, currentFormula); cellExport5.AddFormula(2,currentRow,currentFormula); //bool. currentFormula = "=false"; cellExport5.AddString(1, ++currentRow, currentFormula); cellExport5.AddFormula(2, currentRow, currentFormula); currentFormula = "=1+2+3+4+5-6-7+8-9"; cellExport5.AddString( 1, ++currentRow, currentFormula); cellExport5.AddFormula(2, currentRow, currentFormula); currentFormula = "=33*3/4-2+10"; cellExport5.AddString( 1,++currentRow,currentFormula); cellExport5.AddFormula(2, currentRow, currentFormula); // sheet reference currentFormula = "=Sheet1!$B$3"; cellExport5.AddString(1,++currentRow, currentFormula); cellExport5.AddFormula(2,currentRow, currentFormula); // sheet area reference currentFormula = "=AVERAGE(Sheet1!$D$3:G$3)"; cellExport5.AddString(1, ++currentRow, currentFormula); cellExport5.AddFormula(2,currentRow, currentFormula); // Functions currentFormula = "=Count(3,5,8,10,2,34)"; cellExport5.AddString(1,++currentRow, currentFormula); cellExport5.AddFormula(2,currentRow++, currentFormula); currentFormula = "=NOW()"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=SECOND(11)"; cellExport5.AddString(1 ,currentRow, currentFormula); cellExport5.AddFormula(2, currentRow++, currentFormula); currentFormula = "=MINUTE(12)"; cellExport5.AddString(1, currentRow,currentFormula); cellExport5.AddFormula(2, currentRow++, currentFormula); currentFormula = "=MONTH(9)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=DAY(10)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=TIME(4,5,7)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=DATE(6,4,2)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=RAND()"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=HOUR(12)"; cellExport5.AddString(1, currentRow,currentFormula); cellExport5.AddFormula(2, currentRow++, currentFormula); currentFormula = "=TEXT(\"world\", \"$d\")"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=MOD(5,3)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=WEEKDAY(3)"; cellExport5.AddString(1, currentRow, currentFormula); cellExport5.AddFormula(2, currentRow++, currentFormula); currentFormula = "=YEAR(23)"; cellExport5.AddString(1, currentRow, currentFormula); cellExport5.AddFormula(2, currentRow++, currentFormula); currentFormula = "=NOT(true)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=OR(true)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=AND(TRUE)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=VALUE(30)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=LEN(\"world\")"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=MID(\"world\",4,2)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=ROUND(7,3)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=SIGN(4)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=INT(200)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=ABS(-1.21)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=LN(15)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=EXP(20)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=SQRT(40)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=PI()"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=COS(9)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=SIN(45)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=MAX(10,30)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=MIN(5,7)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=AVERAGE(12,45)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=SUM(18,29)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=IF(4,2,2)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); currentFormula = "=SUBTOTAL(3,Sheet1!B2:E3)"; cellExport5.AddString( 1, currentRow, currentFormula); cellExport5.AddFormula( 2, currentRow++, currentFormula); this.cellExport5.SaveToFile(); } private void cellExport1_GetDataParams(object sender, Spire.DataExport.EventArgs.DataParamsEventArgs e) { if ((e.Sheet == 0) && (e.Col == 6)) { e.FormatText = cellExport1.DataFormats.Currency; } }
Private Sub btnRun_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnRun.Click oleDbConnection1.Open() Try cellExport1.SaveToFile() Finally Me.oleDbConnection1.Close() End Try End Sub Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load LoadData() End Sub Private Sub button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button2.Click LoadData() End Sub Private Sub btnAbout_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnAbout.Click Close() End Sub Private Sub button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button1.Click oleDbConnection1.Open() Try cellExport2.SaveToFile() Finally Me.oleDbConnection1.Close() End Try End Sub Private Sub button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button3.Click oleDbConnection1.Open() Try cellExport3.SaveToFile() Finally Me.oleDbConnection1.Close() End Try End Sub Private Sub button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button4.Click oleDbConnection1.Open() Try cellExport4.SaveToFile() Finally Me.oleDbConnection1.Close() End Try End Sub Private Sub button5_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles button5.Click Dim currentRow As Integer = 1 Dim firstCol As UInt16 = Convert.ToUInt16(1) Dim secondCol As UInt16 = Convert.ToUInt16(2) Dim currentFormula As String = String.Empty Dim cell As cell = Nothing cellExport5.Cells.Clear() cellExport5.SetColumnWidth(System.Convert.ToUInt16(1), System.Convert.ToUInt16(32)) cellExport5.SetColumnWidth(System.Convert.ToUInt16(2), System.Convert.ToUInt16(16)) cellExport5.SetColumnWidth(System.Convert.ToUInt16(3), System.Convert.ToUInt16(16)) cell = cellExport5.AddString(System.Convert.ToUInt16(1), System.Convert.ToUInt16(currentRow), "Examples of formulas :") currentRow += 1 cell.Format.Font.Bold = True cell.Format.FillStyle.Background = CellColor.LightGreen cell.Format.FillStyle.Pattern = Pattern.Solid cell.Format.Borders.Bottom.Style = CellBorderStyle.Medium cell = cellExport5.AddString(System.Convert.ToUInt16(1), System.Convert.ToUInt16(currentRow), "Test data:") currentRow += 1 cell.Format.Font.Bold = True cell.Format.FillStyle.Background = CellColor.LightGreen cell.Format.FillStyle.Pattern = Pattern.Solid cell.Format.Borders.Bottom.Style = CellBorderStyle.Medium 'test data cellExport5.AddNumeric(System.Convert.ToUInt16(2), System.Convert.ToUInt16(currentRow), 7.3) cellExport5.AddNumeric(System.Convert.ToUInt16(3), System.Convert.ToUInt16(currentRow), 5) cellExport5.AddNumeric(System.Convert.ToUInt16(4), System.Convert.ToUInt16(currentRow), 8.2) cellExport5.AddNumeric(System.Convert.ToUInt16(5), System.Convert.ToUInt16(currentRow), 4) cellExport5.AddNumeric(System.Convert.ToUInt16(6), System.Convert.ToUInt16(currentRow), 3) cellExport5.AddNumeric(System.Convert.ToUInt16(7), System.Convert.ToUInt16(currentRow), 11.3) currentRow += 1 currentRow += 1 cell = cellExport5.AddString(Convert.ToUInt16(1), Convert.ToUInt16(currentRow), "Formulas") cell.Format.Font.Bold = True cell.Format.FillStyle.Background = CellColor.LightGreen cell.Format.FillStyle.Pattern = Pattern.Solid cell.Format.Borders.Bottom.Style = CellBorderStyle.Medium cell = cellExport5.AddString(secondCol, Convert.ToUInt16(currentRow), "Results") currentRow += 1 cell.Format.Font.Bold = True cell.Format.FillStyle.Background = CellColor.LightGreen cell.Format.FillStyle.Pattern = Pattern.Solid cell.Format.Borders.Bottom.Style = CellBorderStyle.Medium 'str. currentFormula = "=""hello""" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), "=""hello""") cellExport5.AddFormula(Convert.ToUInt16(3), Convert.ToUInt16(currentRow), "=""" & ChrW(20320) & ChrW(22909) + """") currentRow += 1 'int. currentFormula = "=300" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 ' float currentFormula = "=3389.639421" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 'bool. currentFormula = "=false" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=1+2+3+4+5-6-7+8-9" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=33*3/4-2+10" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 ' sheet reference currentFormula = "=Sheet1!$B$3" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 ' sheet area reference currentFormula = "=AVERAGE(Sheet1!$D$3:G$3)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 ' Functions currentFormula = "=Count(3,5,8,10,2,34)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=NOW()" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=SECOND(11)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=MINUTE(12)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=MONTH(9)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=DAY(10)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=TIME(4,5,7)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=DATE(6,4,2)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=RAND()" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=HOUR(12)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=TEXT(""world"", ""$d"")" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=MOD(5,3)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=WEEKDAY(3)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=YEAR(23)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=NOT(true)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=OR(true)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=AND(TRUE)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=VALUE(30)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=LEN(""world"")" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=MID(""world"",4,2)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=ROUND(7,3)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=SIGN(4)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=INT(200)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=ABS(-1.21)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=LN(15)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=EXP(20)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=SQRT(40)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=PI()" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=COS(9)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=SIN(45)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=MAX(10,30)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=MIN(5,7)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=AVERAGE(12,45)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=SUM(18,29)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=IF(4,2,2)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 currentFormula = "=SUBTOTAL(3,Sheet1!B2:E3)" cellExport5.AddString(firstCol, Convert.ToUInt16(currentRow), currentFormula) cellExport5.AddFormula(secondCol, Convert.ToUInt16(currentRow), currentFormula) currentRow += 1 Me.cellExport5.SaveToFile() End Sub Private Sub cellExport1_GetDataParams(ByVal sender As Object, ByVal e As Spire.DataExport.EventArgs.DataParamsEventArgs) Handles cellExport1.GetDataParams, cellExport3.GetDataParams If (e.Sheet = 0) AndAlso (e.Col = 6) Then e.FormatText = cellExport1.DataFormats.Currency End If End Sub