导出数据表到Excel时出错

本文关键字:出错 Excel 数据表 | 更新日期: 2023-09-27 18:12:43

我使用下面的代码导出excel使用Microsoft.Office.Interop.Excel。[office女士2003]。我需要导出大约150000行可以有最多300列。

但是在Get_Range上得到错误。[50000行40列工作正常]

public static void ExportToExcel(DataTable dt, string outputPath)
    {
        try
        {
            // Create the Excel Application object
            ApplicationClass excelApp = new ApplicationClass();
            // Create a new Excel Workbook
            Workbook excelWorkbook = excelApp.Workbooks.Add(Type.Missing);
            int sheetIndex = 0;
            // Copy each DataTable

            // Copy the DataTable to an object array
            object[,] rawData = new object[dt.Rows.Count + 1, dt.Columns.Count];
            // Copy the column names to the first row of the object array
            for (int col = 0; col < dt.Columns.Count; col++)
            {
                rawData[0, col] = dt.Columns[col].ColumnName;
            }
            // Copy the values to the object array
            for (int col = 0; col < dt.Columns.Count; col++)
            {
                for (int row = 0; row < dt.Rows.Count; row++)
                {
                    rawData[row + 1, col] = dt.Rows[row].ItemArray[col];
                }
            }
            // Calculate the final column letter
            string finalColLetter = string.Empty;
            string colCharset = "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
            int colCharsetLen = colCharset.Length;
            if (dt.Columns.Count > colCharsetLen)
            {
                finalColLetter = colCharset.Substring(
                    (dt.Columns.Count - 1) / colCharsetLen - 1, 1);
            }
            finalColLetter += colCharset.Substring(
                    (dt.Columns.Count - 1) % colCharsetLen, 1);
            // Create a new Sheet
            Worksheet excelSheet = (Worksheet)excelWorkbook.Sheets.Add(
                excelWorkbook.Sheets.get_Item(++sheetIndex),
                Type.Missing, 1, XlSheetType.xlWorksheet);
            excelSheet.Name = "data";
            // Fast data export to Excel
            string excelRange = string.Format("A1:{0}{1}",
                finalColLetter, dt.Rows.Count + 1);
           //excelSheet.get_Range(
            excelSheet.get_Range(excelRange, Type.Missing).Value2 = rawData;
            // Mark the first row as BOLD
            ((Range)excelSheet.Rows[1, Type.Missing]).Font.Bold = true;

            // Save and Close the Workbook
            excelWorkbook.SaveAs("C:''Dashsrv''data.Xls", XlFileFormat.xlWorkbookNormal, Type.Missing,
                Type.Missing, Type.Missing, Type.Missing, XlSaveAsAccessMode.xlExclusive,
                Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);
            excelWorkbook.Close(true, Type.Missing, Type.Missing);
            excelWorkbook = null;
            // Release the Application object
            excelApp.Quit();
            excelApp = null;
            // Collect the unreferenced objects
            GC.Collect();
            GC.WaitForPendingFinalizers();
            MessageBox.Show("File created at");
        }
        catch(Exception ex)
        {
            MessageBox.Show(ex.Message);
        }
    }

下面一行代码出现错误

[{"Exception from HRESULT: 0x800A03EC"}]excelSheet。get_Range (excelRange Type.Missing)。Value2 = rawData;

是否Get_Range()对行/列有一些限制?

据我所知,MS Office 2003列的限制是256,不确定行限制。

谢谢

导出数据表到Excel时出错

Excel 2003在单个工作表(规范)中最多可以有65536行

Excel 2007及更新版本可以有1048576行(规格:Excel 2007, Excel 2010和Excel 2013)

Excel 2003行限制为65,536 - http://support.microsoft.com/kb/120596