首页 > 解决方案 > VSTO C# Excel 工作簿所有工作表

问题描述

我正在使用 C# VSTO 在目录中的所有 Excel 文件中进行文本替换。目前,我的代码有效,但仅适用于每个 Excel 文件的活动工作表(第一个工作表)。如何对 Excel 文件中的所有现有工作表执行此操作:

public void runFiles(string _path)
        {
            string path = _path;
            object m = Type.Missing;

            var xlApp = new Microsoft.Office.Interop.Excel.Application();

            DirectoryInfo d = new DirectoryInfo(path);

            FileInfo[] listOfFiles_1 = d.GetFiles("*.xlsx*").ToArray();
            FileInfo[] listOfFiles_2 = d.GetFiles("*.xls*").ToArray();

            FileInfo[] listOfFiles = listOfFiles_1.Concat(listOfFiles_2).ToArray();

            xlApp.DisplayAlerts = false;
            foreach (FileInfo file in listOfFiles)
            {

                var xlWorkBook = xlApp.Workbooks.Open(file.FullName);
                Excel.Worksheet xlWorkSheet = xlWorkBook.Worksheets;

                // get the used range. 
                Excel.Range r = (Excel.Range)xlWorkSheet.UsedRange;

                // call the replace method to replace instances. 
                bool success = (bool)r.Replace(
                    "Engineer",
                    "Designer",
                    Excel.XlLookAt.xlWhole,
                    Excel.XlSearchOrder.xlByRows,
                    true, m, m, m);

                xlWorkBook.Save();
                xlWorkBook.Close();
            }

            xlApp.Quit();

            Marshal.ReleaseComObject(xlApp);
        }

xlWorkBook.ActiveSheet只抓取唯一的第一张纸。我试过xlWorkBook.Worksheets了,但我得到一个错误Cannot implicitly convert type 'Microsoft.Office.Interop.Excel.Sheets' to 'Microsoft.Office.Interop.Excel.Worksheet'. An explicit conversion exists (are you missing a cast?)

标签: c#excelvsto

解决方案


Worksheets属性是工作表的集合。所以你只需要遍历它。

foreach (Excel.Worksheet xlWorkSheet in xlWorkBook.Worksheets)
{
    // get the used range. 
    Excel.Range r = (Excel.Range)xlWorkSheet.UsedRange;

    // call the replace method to replace instances. 
    bool success = (bool)r.Replace(
        "Engineer",
        "Designer",
        Excel.XlLookAt.xlWhole,
        Excel.XlSearchOrder.xlByRows,
        true, m, m, m);
}

推荐阅读