如何通过C#.NET与.xlsm一起工作?

时间:2014-08-05 06:09:48

标签: c# xlsm

我有C#app从excel删除前几行,然后将文件格式化为.csv,但现在我没有.xlsx但是.xlsm我无法找到如何使用,我甚至无法从列加载数据。它的一些报告文件来自SAP,我没有在里面找到任何宏。我试过这样的事情

        /* Load Excel File */
        Excel.Application excelApp = new Excel.Application();
        string workbookPath = @"file.xlsm";
        Excel.Workbook excelWorkbook = excelApp.Workbooks.Open(workbookPath, 0, true, 5, "", "", true, Microsoft.Office.Interop.Excel.XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0);

        /* Load worksheets collection */
        Excel.Sheets excelSheets = excelWorkbook.Worksheets;

        /* Select first worksheet */
        Excel.Worksheet excelWorksheet = (Excel.Worksheet)excelSheets[1];

        /* Deleting first 87 Rows */
        Excel.Range range = excelWorksheet.get_Range("1:87").EntireRow;
        range.Delete(Excel.XlDeleteShiftDirection.xlShiftUp);

        /* Save File */
        excelWorkbook.SaveAs(@"out_file.xlsm");
        excelWorkbook.Close(false);
        excelApp.Application.Quit();

        /* Release COM objects otherwise Excel remain running */
        releaseObject(range);
        releaseObject(excelWorkbook);
        releaseObject(excelWorksheet);
        releaseObject(excelApp);

这项工作使用.xlsx扩展名(它将删除行并将其保存在另一个名称下)但不能与.xlsm一起使用(程序运行成功但不删除数据)。即使我手动excel文件另存为.xlsx并在该文件上运行程序它不起作用,但如果我手动将粘贴数据复制到另一个.xlsx并在该文件上运行程序它工作,我不明白。如何重写此程序以从.xlsm文件中删除行?请帮忙,谢谢。

1 个答案:

答案 0 :(得分:2)

感谢Christian Sauer,EPPLUS.dll工作正常。

第1步

Solution Explorer>项目名称>添加>参考>浏览到EPPLUS.dll

第2步

using OfficeOpenXml;
using OfficeOpenXml.Style;
using System.IO;

步骤3(删除行范围)

 using (var p = new ExcelPackage(new FileInfo(@"file.xlsm")))
            {
                var sheet = p.Workbook.Worksheets["Sheet1"];
                sheet.DeleteRow(1, 87);
                p.SaveAs(new FileInfo(@"output.xlsm"));
            }
)

第4步(将.xlsm导出为.csv)

在这些行之间插入代码

                sheet.DeleteRow(1, 87);
           ====>[HERE]
                p.SaveAs(new FileInfo(@"output.xlsm"));

/* Code placed to [HERE] placeholder */
using (var writer = File.CreateText(@"output.csv"))
            {
                var rowCount = sheet.Dimension.End.Row;
                var columnCount = sheet.Dimension.End.Column;
                for (var r = 1; r <= rowCount; r++)
                {
                    for (var c = 1; c <= columnCount; c++)
                    {
                        writer.Write(sheet.Cells[r, c].Value);
                        writer.Write(";");
                    }
                    writer.WriteLine();
                }
            }