C＃无法保存文本数据到Excel文件

Question

据我所知，有没有错误在下面的代码可言：

private Excel.Application Xls; 
    private Excel.Workbooks XlsB; 
    private Excel.Workbook WB; 
    private Excel.Worksheet WS; 
    private Excel.Sheets WBs; 

private void btnPrint_Click(object sender, EventArgs e) 
    { 
     try 
     { 
      Xls = new Excel.Application(); 
      XlsB = Xls.Workbooks; 
      WB = XlsB.Open(lblPath.Text, 0, false, 5, "", "", true, 
       XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0); 
      Sheets WBs = WB.Worksheets; 
      Worksheet WS = WBs.get_Item(1); 
      WS.Cells[1, 1] = txtTATW.Text; 
      WB.Save(); 
     } 
     catch (Exception ex) 
     { 
      MessageBox.Show("Write Excel: " + ex.Message); 
     } 
     finally 
     { 
      GC.Collect(); 
      GC.WaitForPendingFinalizers(); 
      releaseObject(WS); 
      releaseObject(WBs); 
      releaseObject(WB); 
      releaseObject(XlsB); 
      WB.Close(true, lblPath.Text, misValue); 
      Xls.Quit(); 
      releaseObject(Xls); 
     } 
    } 

最后释放方法：

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

    } 

一些数据从不同的窗体中传出，这在这里是不可见的，但是所有重要的东西都应该列出来！

它基本上只是将数据从文本框拉到特定的单元格中。现在，我只用一次单元测试它。 希望第二双眼睛能帮助我找到解决方案。

Answer 1

我在释放〜释放对象（WB）之前移动了〜WB.Close（）〜代码用一些文本改变了单元[1,1]。我改变了窗体的路径和文本，但excel部分正确保存。希望这可以帮助。

private Excel.Application Xls; 
private Excel.Workbooks XlsB; 
private Excel.Workbook WB; 
private Excel.Worksheet WS; 
private Excel.Sheets WBs; 
string lblPath = "SomePath"; 
string txtTATW = "Some Text"; 

private void btnPrint_Click(object sender, EventArgs e) 
{ 
    try 
    { 
    Xls = new Excel.Application(); 
    XlsB = Xls.Workbooks; 
    WB = XlsB.Open(@"H:\ExcelTestFolder\TestAddData.xlsx", 0, false, 5, "", "", true, 
     XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0); 
    WBs = WB.Worksheets; 
    WS = WBs.get_Item(1); 
    WS.Cells[1, 1] = txtTATW; 
    WB.Save(); 
    } 
    catch (Exception ex) 
    { 
    MessageBox.Show("Write Excel: " + ex.Message); 
    } 
    finally 
    { 
    GC.Collect(); 
    GC.WaitForPendingFinalizers(); 
    WB.Close(); 
    Xls.Quit(); 
    releaseObject(WS); 
    releaseObject(WBs); 
    releaseObject(WB); 
    releaseObject(XlsB); 
    releaseObject(Xls); 
    } 
    MessageBox.Show("Finished Updating File"); 
}