Question

我现在已经挣扎了一段时间了。我正在使用Microsoft.Office.Interop.Excel，我尝试执行以下操作：

我有一个模板，我用Excel制作了4个工作表。当我尝试填充工作表时，总会有一个空的工作表，即使在调试时我可以看到已经选择了正确的工作表，并且每个Range对象都被赋予了一个没有任何错误的值。

在这种方法中有2次迭代。如果我注释掉其中一个迭代，则另一个迭代完美地工作。所以基本上我总是得到一个空白的工作表。

我出错的任何想法？

提前谢谢！

public void generateReport()
    {
        Excel.Application xlApp;
        Excel.Workbook xlWorkBook;
        Excel.Worksheet xlWorkSheet;
        object misValue = System.Reflection.Missing.Value;
        Excel.Range range;
        int row = 3;
        xlApp = new Excel.Application();
        if (xlApp == null)
        {
            MessageBox.Show("Kon Excel niet starten, kijk uw softwareinstelling na !");
            return;
        }

        string workbookPath = Path.Combine(Environment.CurrentDirectory, @"..\report.xlsx");
        xlWorkBook = xlApp.Workbooks.Open(workbookPath,
            0, false, 5, "", "", false, Excel.XlPlatform.xlWindows, "",
            true, false, 0, true, false, false);


        xlWorkSheet = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(1);
        ArrayList dossiers = DossierDao.Instance.getDossiers("SELECT * FROM dossier ORDER BY referentie;");
        foreach (Object o in dossiers)
        {
            File f = (File)o;
            range = xlWorkSheet.get_Range("A" + row);
            range.Value = d.Reference;
            range = xlWorkSheet.get_Range("B" + row);
            range.Value = d.Info;
            row++;
        }

        xlWorkSheet = (Excel.Worksheet)xlWorkBook.Worksheets.get_Item(3);
        ArrayList facturen = FactuurDao.Instance.getAllFacturen();
        foreach (Object o in facturen)
        {
            Invoice i = (Invoice)o;
            range = xlWorkSheet.get_Range("A" + row);
            range.Value = f.InvoiceNumber;
            range = xlWorkSheet.get_Range("B" + row);
            range.Value = f.Amount;
            row++;
        }
        try
        {
            xlApp.Visible = true;
        }
        catch

           //...
        }

        releaseObject(xlApp);
        releaseObject(xlWorkBook);
        releaseObject(xlWorkSheet);
        releaseObject(xlWorkSheet);
    }

    private void releaseObject(object obj)
    {
        try
        {
            System.Runtime.InteropServices.Marshal.ReleaseComObject(obj);
            obj = null;
        }
        catch (Exception ex)
        {
            obj = null;
            MessageBox.Show("Unable to release the Object " + ex.ToString());
        }
        finally
        {
            GC.Collect();
        }
    }
}

Answer 1

在处理档案和事实之间，你没有重新初始化row。因此，如果您在第3行到第52行有50个档案，那么代码将开始将facturen放在下一个工作表的第53行。

空工作表 - Microsoft.Office.Interop.Excel

1 个答案: