使用互操作向Excel添加新工作表

Question

我可以正确地创建一个Excel 2个工作表,我可以写一个DataTable的数据表1,我想同样的数据写入到第2页,但第2页似乎空白.为什么"表2"是空白的？

这是我的代码:

Microsoft.Office.Interop.Excel.Application xlApp = new Microsoft.Office.Interop.Excel.Application();
if (xlApp == null)
{
    Console.WriteLine("EXCEL could not be started. Check that your office installation and project references are correct.");
    return;
}
xlApp.Visible = true;

Microsoft.Office.Interop.Excel.Workbook wb = xlApp.Workbooks.Add(Microsoft.Office.Interop.Excel.XlWBATemplate.xlWBATWorksheet);
Microsoft.Office.Interop.Excel.Worksheet ws = (Microsoft.Office.Interop.Excel.Worksheet)wb.Worksheets[1];

{
    if (ws == null)
    {
        Console.WriteLine("Worksheet could not be created. Check that your office installation and project references are correct.");
    }

    Microsoft.Office.Interop.Excel.Range aRange = ws2.get_Range("C1", "C7");

    for (int i = 0; i < main_dt.Columns.Count; i++)
    {
        ws.Cells[1, i + 1] = main_dt.Columns[i].ColumnName;
        aRange = (Microsoft.Office.Interop.Excel.Range)ws.Cells[1, i + 1];
        aRange.Interior.ColorIndex = 15;
        aRange.Font.Bold = true;
    }

    for (int r = 0; r < main_dt.Rows.Count; r++)
    {
        for (int i = 0; i < main_dt.Columns.Count; i++)
        {
            ws.Cells[r + 2, i + 1] = main_dt.Rows[r][i].ToString();
        }    
    }
}   

// WORKSHEET 2 ******************
wb.Sheets.Add();
Microsoft.Office.Interop.Excel.Worksheet ws2 = (Microsoft.Office.Interop.Excel.Worksheet)wb.Worksheets[2];

{
    if (ws2 == null)
    {
        Console.WriteLine("Worksheet could not be created. Check that your office installation and project references are correct.");
    }

    Microsoft.Office.Interop.Excel.Range aRange = ws2.get_Range("C1", "C7");

    for (int i = 0; i < main_dt.Columns.Count; i++)
    {
        ws2.Cells[1, i + 1] = main_dt.Columns[i].ColumnName;
        aRange = (Microsoft.Office.Interop.Excel.Range)ws2.Cells[1, i + 1];
        aRange.Interior.ColorIndex = 15;
        aRange.Font.Bold = true;    
    }

    for (int r = 0; r < main_dt.Rows.Count; r++)
    {
        for (int i = 0; i < main_dt.Columns.Count; i++)
        {
            ws2.Cells[r + 2, i + 1] = main_dt.Rows[r][i].ToString();
        }    
    }
}

Answer 1

代替:

wb.Sheets.Add();
Microsoft.Office.Interop.Excel.Worksheet ws2 = 
                      (Microsoft.Office.Interop.Excel.Worksheet)wb.Worksheets[2];

尝试:

Microsoft.Office.Interop.Excel.Worksheet ws2 = 
                       (Microsoft.Office.Interop.Excel.Worksheet)wb.Sheets.Add();