2

合并单个选项卡式工作簿时，整个应用程序运行良好。但后来我添加了功能，在将书与另一本书合并之前，还可以合并书中的所有工作表。

它合并了它们（在单个多标签 wbook 上测试），但在某些时候开始搞砸了。例如

结果：

  • sheet1 -empty lines- sheet2 -empty lines- sheet3+ sheet4 的一半 -empty lines- sheet2 再次不是全部，缺少一些值

ETC...

我不确定代码是否需要额外的东西，或者某些工作表中的问题。

以下是关键部分：

for (int i = 0; i < pathList.Count; i++)
{
     List<string> Sheet = GetSheetName(path);
     filename = GetFileName(path);
     MyConnection = new System.Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0;Data Source='" + path + "';Extended Properties='Excel 8.0;IMEX=1;'");


     foreach (string SheetName in Sheet)
     {
        //OLEDB SECTION ***********************************************
        MyCommand = new System.Data.OleDb.OleDbDataAdapter("select * from [" +  SheetName + "$]", MyConnection);
        MyCommand.TableMappings.Add(pathList.Count.ToString(), filename);
        MyCommand.Fill(table);
        lstTable.Add(table);
        MyConnection.Close();
        MyCommand.Dispose();
        //*************************************************************
      }

}

和 getSheetNames

List<string> GetSheetName(string path)
{
    Microsoft.Office.Interop.Excel.Application xlApp;
    Microsoft.Office.Interop.Excel.Workbook xlWorkBook;
    Microsoft.Office.Interop.Excel.Worksheet xlWorkSheet;
    List<string> names = new List<string>();

    xlApp = new Microsoft.Office.Interop.Excel.Application();
    xlWorkBook = xlApp.Workbooks.Open(path, 0, true, 5, "", "", true,        Microsoft.Office.Interop.Excel.XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0);



    foreach (Microsoft.Office.Interop.Excel.Worksheet i in xlWorkBook.Worksheets)
     if (i.UsedRange.Count > 0)
            names.Add(i.Name);



  return names ;
  }
4

0 回答 0