在 C# 中从不同的 Excel 工作表复制数据

Question

我正在使用 Windows 桌面应用程序，我希望打开一个新的 Excel 工作簿和工作表，然后让用户选择一个现有的 Excel 文件，以便程序可以将数据复制到新工作表上。用户应该这样做两次，因为使用了两个 Excel 文件作为参考。

我知道要获取新的 Excel 工作簿和工作表，您需要执行以下操作：

Excel.Application oXL;
Excel._Workbook oWB;
Excel._Worksheet oSheet;
Excel.Range oRng;

oXL = new Excel.Application();
oXL.Visible = true;

//Get a new workbook.
oWB = (Excel._Workbook)(oXL.Workbooks.Add(Missing.Value));
oSheet = (Excel._Worksheet)oWB.ActiveSheet;
string sheetName = comboBox1.Text;
oSheet.Name = sheetName;

但是我迷路的是如何引用用户选择的文件...... 你会...

string excelPath = string.Empty;
using (OpenFileDialog excelFile = new OpenFileDialog())
{
    excelFile.InitialDirectory = "c:\\";
    if(excelFile.ShowDialog() == DialogResult.OK)
    {

    }
}

之后如何引用所选 Excel 文件中的数据，例如，从 A 列中提取所有内容并将其复制到新的 Excel 文件中？

Answer 1

这是我过去通过互操作的剪贴板功能使用的一个小功能：

using Microsoft.Office.Interop.Excel;

public bool XlsCopyPaste(ref Workbook srcWb,
                         string srcSheetName, string srcRange,
                         ref Workbook tgtWb,
                         string tgtSheetName, string tgtRange,
                         XlPasteType pasteType)
{
    try
    {   
        var srcWs = srcWb.Sheets.Cast<Worksheet>().ToList();
        var tgtWs = tgtWb.Sheets.Cast<Worksheet>().ToList();

        var srcSheet = srcWs.FirstOrDefault(s => s.Name == srcSheetName);
        if (srcSheet != null)
        {
            var tgtSheet = tgtWs.FirstOrDefault(s => s.Name == tgtSheetName);
            if (tgtSheet == null)
            {
                tgtSheet = tgtWb.Sheets.Add();
                tgtSheet.Name = tgtSheetName;
            }

            var source = srcSheet.Range(srcRange);
            var target = tgtSheet.Range(tgtRange);

            source.Copy();
            target.PasteSpecial(pasteType, XlPasteSpecialOperation.xlPasteSpecialOperationNone, false, false);
        }
    }
    catch (Runtime.InteropServices.COMException ex)
    {
        return false;
    }
}

你可以这样称呼它：

var xl = new Application();
var srcWb = (Workbook)xl.Workbooks.Open(xl.GetOpenFilename("Excel Workbooks (*.xls; *.xlsx),*.xls;*.xlsx").ToString());
var tgtWb = (Workbook)xl.Workbooks.Open(xl.GetOpenFilename("Excel Workbooks (*.xls; *.xlsx),*.xls;*.xlsx").ToString());

if (XlsCopyPaste(srcWb, "Sheet1", "B:C", tgtWb, "Sheet2", "A1", XlPasteType.xlPasteAll))
{
    tgtWb.Save();
}

srcWb.Close();
tgtWb.Close();

xl.Quit();