使用COM接口对Excel的一些常用操作

  • A+
所属分类:.NET技术
摘要

操作系统需要安装有Excel
添加Microsoft Excel 16.0 Object Library引用(已系统安装的版本为准)

阅读材料:https://docs.microsoft.com/zh-cn/office/client-developer/excel/excel-home


前提

操作系统需要安装有Excel
添加Microsoft Excel 16.0 Object Library引用(已系统安装的版本为准)
使用COM接口对Excel的一些常用操作
阅读材料:https://docs.microsoft.com/zh-cn/office/client-developer/excel/excel-home

创建Excel电子表格

类库引用 using Excel = Microsoft.Office.Interop.Excel;

 Excel.Application app = new Excel.Application();// 始化Excel应用程序对象 if (app == null) // 检查系统是否已安装Excel {     MessageBox.Show("Excel未正确安装!");     return; } object misValue = System.Reflection.Missing.Value;// 工作簿模板 Excel.Workbook book = app.Workbooks.Add(misValue);// 如果此参数为指定现有 Microsoft Excel 文件名的字符串,那么创建新工作簿将以该指定的文件作为模板。如果此参数为常量,新工作簿将包含一个指定类型的工作表。 可以是以下 XlWBATemplate 常量之一:xlWBATChart、xlWBATExcel4IntlMacroSheet、xlWBATExcel4MacroSheet 或 xlWBATWorksheet。如果省略此参数,Microsoft Excel创建一个包含大量空白工作表的新工作簿(由 SheetsInNewWorkbook 属性设置)  Excel.Worksheet sheet = (Excel.Worksheet)book.Worksheets.get_Item(1); // 获取工作表 sheet.Cells[1, 1] = "ID"; sheet.Cells[1, 2] = "Name"; sheet.Cells[2, 1] = "1001"; sheet.Cells[2, 2] = "张三"; sheet.Cells[3, 1] = "1002"; sheet.Cells[3, 2] = "李四"; book.SaveAs("名单表.xls",Excel.XlFileFormat.xlWorkbookNormal, misValue, misValue, misValue, misValue, Excel.XlSaveAsAccessMode.xlExclusive, misValue, misValue, misValue, misValue, misValue); // 保存电子表格  book.Close(true, misValue, misValue); app.Quit();  // 资源清理 Marshal.ReleaseComObject(sheet); Marshal.ReleaseComObject(book); Marshal.ReleaseComObject(app);  

打开Excel电子表格

object misValue = System.Reflection.Missing.Value; Excel.Application app = new Excel.Application();// 始化Excel应用程序对象 var book = app.Workbooks.Open("名单表.xls", 0, true, 5, "", "", true, Excel.XlPlatform.xlWindows, "t", false, false, 0, true, 1, 0); // 打开电子表格 var sheet = (Excel.Worksheet)book.Worksheets.get_Item(1); var cells = sheet.get_Range("A1", "B2").Value; // 获取单元格范围 Console.WriteLine(cells[2, 2]);  book.Close(true, misValue, misValue); app.Quit();  // 资源清理 Marshal.ReleaseComObject(sheet); Marshal.ReleaseComObject(book); Marshal.ReleaseComObject(app);  

读取Excel电子表格

object misValue = System.Reflection.Missing.Value; Excel.Application app = new Excel.Application();// 始化Excel应用程序对象 var book = app.Workbooks.Open(@"名单表.xls", 0, true, 5, "", "", true, Excel.XlPlatform.xlWindows, "t", false, false, 0, true, 1, 0); var sheet = (Excel.Worksheet)book.Worksheets.get_Item(1); Excel.Range range = sheet.UsedRange; //指定工作表上的已用区域。 此为只读属性   for (int i = 1; i <= range.Rows.Count; i++) {     for (int j = 1; j <= range.Columns.Count; j++)     {         Console.WriteLine((range.Cells[i, j] as Excel.Range).Value);         // Console.WriteLine((range.Cells[i, j] as Excel.Range).Value2); // 此属性和 Value 属性之间的唯一区别是 Value2 属性不使用 Currency 和 Date 数据类型。 可以通过使用 Double 数据类型,以浮点数形式返回这些数据类型格式的数值。https://docs.microsoft.com/zh-cn/office/vba/api/excel.range.value2     } }  book.Close(true, null, null); app.Quit();  Marshal.ReleaseComObject(sheet); Marshal.ReleaseComObject(book); Marshal.ReleaseComObject(app);  

新增一个工作表

Excel.Application app = new Excel.Application();// 始化Excel应用程序对象 app.DisplayAlerts = false;  var book = app.Workbooks.Open(@"名单表.xls", 0, false, 5, "", "", true, Excel.XlPlatform.xlWindows, "t", false, false, 0, true, 1, 0); Excel.Sheets sheets = book.Worksheets;// 该集合代表指定工作簿中所有工作表。 Sheets对象只读  var newSheet = (Excel.Worksheet)sheets.Add(sheets[1], Type.Missing, Type.Missing, Type.Missing); // 邢增一个工作表 newSheet.Name = $"Sheet{book.Worksheets.Count}"; newSheet.Cells[1, 1] = "新增的工作表";  newSheet = (Excel.Worksheet)book.Worksheets.get_Item(2); newSheet.Select(); // 选择 (替换),若要使单个工作表成为活动工作表,请使用 Activate 方法。 https://docs.microsoft.com/zh-cn/office/vba/api/excel.worksheet.select  book.Save();  book.Close(true, null, null); app.Quit();  Marshal.ReleaseComObject(newSheet); Marshal.ReleaseComObject(sheets); Marshal.ReleaseComObject(book); Marshal.ReleaseComObject(app);  

打开文件时注意设置文件的ReadOnly属性为false

删除一个工作表

Excel.Application app = new Excel.Application();// 始化Excel应用程序对象 app.DisplayAlerts = false; // 要删除工作表但不显示对话框,请将 Application.DisplayAlerts 属性设置为 False。  var book = app.Workbooks.Open(@"名单表.xls", 0, false, 5, "", "", true, Excel.XlPlatform.xlWindows, "t", false, false, 0, true, 1, 0); Excel.Sheets sheets = book.Worksheets; sheets["Sheet1"].Delete(); // https://docs.microsoft.com/zh-cn/office/vba/api/excel.worksheet.delete book.Save();  book.Close(true, null, null); app.Quit();  Marshal.ReleaseComObject(sheets); Marshal.ReleaseComObject(book); Marshal.ReleaseComObject(app);  

加载Excel数据到DataGridView

string filePath = @"C:UserszhmDocuments成绩表.xlsx"; string connectString = $"Provider=Microsoft.ACE.OLEDB.12.0;Data Source={filePath};Extended Properties='Excel 8.0;HDR=YES'"; // xls 连接串 connectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + fileLocation + ";Extended Properties="Excel 8.0;HDR=Yes;IMEX=2" string sqltext = "select * from [Sheet1$]"; using (var connection = new OleDbConnection(connectString)) using (var adapter = new OleDbDataAdapter(sqltext, connection)) {     adapter.TableMappings.Add("Table", "Score");     var dtSet = new DataSet();     adapter.Fill(dtSet);     dataGridView1.DataSource = dtSet.Tables[0]; }  

通过ODBC可以更简单的实现Excel表格数据的增删查改操作https://docs.microsoft.com/zh-cn/office/vba/api/excel.odbcconnection

格式化电子表格

使用COM接口对Excel的一些常用操作

 var book = app.Workbooks.Open(@"成绩表.xlsx", 0, false, 5, "", "", true, Excel.XlPlatform.xlWindows, "t", false, false, 0, true, 1, 0);  var sheet = (Excel.Worksheet)book.Worksheets.get_Item(1);   var headerRange = sheet.get_Range("A1", "D1");  headerRange.Font.Bold = true;// 字体加粗  headerRange.Font.Color = Color.Red;// 字体颜色设置  headerRange.Interior.Color = Color.LightBlue; // 单元格内部颜色   var courseRange = sheet.get_Range("C1", "C7");  courseRange.VerticalAlignment = XlVAlign.xlVAlignCenter;// 垂直居中 https://docs.microsoft.com/zh-cn/office/vba/api/excel.xlvalign  courseRange.HorizontalAlignment = XlHAlign.xlHAlignCenter;// 水平居中 https://docs.microsoft.com/zh-cn/office/vba/api/excel.xlhalign   var cellsRange = sheet.get_Range("A1", "D7");  cellsRange.Borders.Color = Color.Black; // 边框线颜色  https://docs.microsoft.com/zh-cn/office/vba/api/excel.borders  

格式调整后
使用COM接口对Excel的一些常用操作

更多设置参考https://docs.microsoft.com/zh-cn/office/vba/api/excel.range(object)

向工作表中插入一张图片

// ...省略打开文件的代码  var sheet = (Excel.Worksheet)book.Worksheets.get_Item(1); sheet.Shapes.AddPicture(@"C:UserszhmPicturesvs.png", MsoTriState.msoFalse, MsoTriState.msoCTrue, 120, 150, 300, 45); // 向工作表中插入一张图片 sheet.SetBackgroundPicture(@"C:UserszhmPicturesvsbg.jpg"); // 设置工作表背景图 book.Save();  // ...省略释放资源的代码 

添加图片参数说明https://docs.microsoft.com/zh-CN/office/vba/api/Excel.Shapes.AddPicture

向工作表中添加图表

使用COM接口对Excel的一些常用操作

// ...省略打开文件的代码    Excel.ChartObjects charts = (Excel.ChartObjects)sheet.ChartObjects(Type.Missing);   Excel.ChartObject chartPosition = (Excel.ChartObject)charts.Add(240, 20, 300, 250);   Excel.Chart chartPage = chartPosition.Chart;    Excel.Range chartRange = sheet.get_Range("A1", "D7");   chartPage.SetSourceData(chartRange, misValue); // 设置源数据区域   chartPage.ChartType = Excel.XlChartType.xl3DLine; // 图标类型设置    book.Save();  // ...省略释放资源的代码 

还可以通过图标对象的Export方法将生成的图表以图形格式导出

// 导出图表 chartPage.Export(@"C:UserszhmDesktopscores.bmp", "BMP",misValue ); 

图表类型设置参考https://docs.microsoft.com/zh-cn/office/vba/api/excel.xlcharttype

电子表格数据验证

使用COM接口对Excel的一些常用操作

//... 打开电子表格  var sheet = (Excel.Worksheet)book.Worksheets.get_Item(1); var cellsRange = sheet.get_Range("D2", "D7"); cellsRange.Validation.Add(Excel.XlDVType.xlValidateCustom, XlDVAlertStyle.xlValidAlertStop, XlFormatConditionOperator.xlBetween, 0, 100); cellsRange.Validation.IgnoreBlank = true; // 指定区域内的数据有效性检验允许空值,则该值为 True cellsRange.Validation.InputTitle = "提示"; cellsRange.Validation.InputMessage = "请输入分数"; // 设置数据有效性检验输入信息 cellsRange.Validation.ErrorMessage = "只允许输入>=0或者<=100的分数"; //设置数据有效性检验错误消息 cellsRange.Validation.ErrorTitle = "分数区域0~100";  //... 保存关闭电子表格 

使用COM接口对Excel的一些常用操作
数据验证设置参考https://docs.microsoft.com/zh-cn/office/vba/api/excel.validation

获取更多关于Excel的工具https://www.nuget.org/packages?q=Excel