栏目分类:
子分类:
返回
名师互学网用户登录
快速导航关闭
当前搜索
当前分类
子分类
实用工具
热门搜索
名师互学网 > IT > 面试经验 > 面试问答

如何将一些数据写入Excel文件(.xlsx)

面试问答 更新时间: 发布时间: IT归档 最新发布 模块sitemap 名妆网 法律咨询 聚返吧 英语巴士网 伯小乐 网商动力

如何将一些数据写入Excel文件(.xlsx)

试试这个代码

Microsoft.Office.Interop.Excel.Application oXL;Microsoft.Office.Interop.Excel._Workbook oWB;Microsoft.Office.Interop.Excel._Worksheet oSheet;Microsoft.Office.Interop.Excel.Range oRng;object misvalue = System.Reflection.Missing.Value;try{    //Start Excel and get Application object.    oXL = new Microsoft.Office.Interop.Excel.Application();    oXL.Visible = true;    //Get a new workbook.    oWB = (Microsoft.Office.Interop.Excel._Workbook)(oXL.Workbooks.Add(""));    oSheet = (Microsoft.Office.Interop.Excel._Worksheet)oWB.ActiveSheet;    //Add table headers going cell by cell.    oSheet.Cells[1, 1] = "First Name";    oSheet.Cells[1, 2] = "Last Name";    oSheet.Cells[1, 3] = "Full Name";    oSheet.Cells[1, 4] = "Salary";    //Format A1:D1 as bold, vertical alignment = center.    oSheet.get_Range("A1", "D1").Font.Bold = true;    oSheet.get_Range("A1", "D1").VerticalAlignment =        Microsoft.Office.Interop.Excel.XlVAlign.xlVAlignCenter;    // Create an array to multiple values at once.    string[,] saNames = new string[5, 2];    saNames[0, 0] = "John";    saNames[0, 1] = "Smith";    saNames[1, 0] = "Tom";    saNames[4, 1] = "Johnson";    //Fill A2:B6 with an array of values (First and Last Names).    oSheet.get_Range("A2", "B6").Value2 = saNames;    //Fill C2:C6 with a relative formula (=A2 & " " & B2).    oRng = oSheet.get_Range("C2", "C6");    oRng.Formula = "=A2 & " " & B2";    //Fill D2:D6 with a formula(=RAND()*100000) and apply format.    oRng = oSheet.get_Range("D2", "D6");    oRng.Formula = "=RAND()*100000";    oRng.NumberFormat = "$0.00";    //AutoFit columns A:D.    oRng = oSheet.get_Range("A1", "D1");    oRng.EntireColumn.AutoFit();    oXL.Visible = false;    oXL.UserControl = false;    oWB.SaveAs("c:\test\test505.xls", Microsoft.Office.Interop.Excel.XlFileFormat.xlWorkbookDefault, Type.Missing, Type.Missing,        false, false, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange,        Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);    oWB.Close();    oXL.Quit();    //...


转载请注明:文章转载自 www.mshxw.com
本文地址:https://www.mshxw.com/it/432983.html
我们一直用心在做
关于我们 文章归档 网站地图 联系我们

版权所有 (c)2021-2022 MSHXW.COM

ICP备案号:晋ICP备2021003244-6号