Excel表複製、取消工作表保護、解除凍結操作

來源:互聯網
上載者:User

最近處理Farpoint儲存下來的Excel時,發現表格式有各種問題,下面是修改Excel格式操作到內容,做下筆記 :)

 

/// <summary>
/// Excel表相關操作
/// </summary>
/// <param name="firstpath">第一個Excel表路徑</param>
/// <param name="secondpath">第二個Excel表路徑</param>
private void ExcelOperation(string firstpath, string secondpath)
{
    try
    {
        Microsoft.Office.Interop.Excel.Application App = new Microsoft.Office.Interop.Excel.Application();
        Microsoft.Office.Interop.Excel.Workbook fWorkbook = App.Workbooks.Open(firstpath, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);
        Microsoft.Office.Interop.Excel.Workbook sWorkbook = App.Workbooks.Open(secondpath, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing);
        App.DisplayAlerts = false;  //屏蔽操作提示
        try
        {
            ((Microsoft.Office.Interop.Excel.Worksheet)sWorkbook.Sheets[1]).Delete();  //刪除第二個表第一個Sheet
            sWorkbook.Save();

            Microsoft.Office.Interop.Excel.Worksheet sheet = (Microsoft.Office.Interop.Excel.Worksheet)fWorkbook.Sheets[1];  //擷取第一個表第一個Sheet

            sheet.Unprotect(Type.Missing);   //取消工作表保護

            Microsoft.Office.Interop.Excel.Range range = (Microsoft.Office.Interop.Excel.Range)sheet.Rows[1, Type.Missing];  //擷取第一行
            sheet.Activate();
            App.ActiveWindow.FreezePanes = false;  //解除凍結
            App.ActiveWindow.SplitColumn = 0;
            App.ActiveWindow.SplitRow = 0;

            range.Interior.ColorIndex = 0;    //設定第一行為白色
            range.Delete(Microsoft.Office.Interop.Excel.XlDirection.xlDown);     //刪除第一行

            sheet.Copy(sWorkbook.Sheets[1], Type.Missing);  //複製到第二個表中
            sWorkbook.Save();

        }
        catch (Exception ex)
        {
        }
        finally
        {
            fWorkbook.Close(false, firstpath, null);
            System.Runtime.InteropServices.Marshal.ReleaseComObject(fWorkbook);
            fWorkbook = null;

            sWorkbook.Close(false, secondpath, null);
            System.Runtime.InteropServices.Marshal.ReleaseComObject(sWorkbook);
            sWorkbook = null;

            App.Quit();
            System.Runtime.InteropServices.Marshal.ReleaseComObject(App);
        }
    }
    catch (Exception ex)
    {

    }
}

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.