将多个Excel工作表合并为一个工作表

Question

我知道如何复制工作表，但这将导致多个工作表。我需要的是一个输出工作表，一个接一个地包含所有的工作表。

目前我正在做的是将每个工作表导出为< code>DataTable，然后逐个导入:

string[] files = { "Book1.xlsx", "Book2.xlsx", "Book3.xlsx" };

var destination = new ExcelFile();
var destinationSheet = destination.Worksheets.Add("Sheets");
int startRow = 0;

foreach (string file in files)
{
    var source = ExcelFile.Load(file);
    foreach (var sourceSheet in source.Worksheets)
    {
        var table = sourceSheet.CreateDataTable(new CreateDataTableOptions());
        destinationSheet.InsertDataTable(table, new InsertDataTableOptions() { StartRow = startRow });
        startRow += table.Rows.Count;
    }
}

destination.Save("Merged Output.xlsx");

但这样，我就失去了单元格样式和文本格式
有没有办法用DataTable保留样式？

Answer 1

编辑（2022-10-28）：

在当前最新版本的geBox.电子表格中，还有另一组CellRange. CopyTo（）重载方法，它们接受CopyOptions参数，您可以使用该参数指定要复制的内容。

例如，您可以指定还希望复制列宽和行高，如下所示：

range.CopyTo(destinationSheet, destinationSheet.Rows.Count, 0,
    new CopyOptions() { CopyTypes = CopyTypes.Default | CopyTypes.ColumnWidths | CopyTypes.RowHeights });

原件：

为此，您可以使用 CellRange.CopyTo 方法，如下所示：

string[] files = { "Book1.xlsx", "Book2.xlsx", "Book3.xlsx" };

var destination = new ExcelFile();
var destinationSheet = destination.Worksheets.Add("Sheets");

foreach (string file in files)
{
    var source = ExcelFile.Load(file);
    foreach (var sourceSheet in source.Worksheets)
    {
        var range = sourceSheet.GetUsedCellRange(true);
        range.CopyTo(destinationSheet, destinationSheet.Rows.Count, 0);
    }
}

destination.Save("Merged Output.xlsx");

请注意，CopyTo 将仅复制单元格的值和样式。

但如果需要，也可以使用类似的方法来复制列宽和行高。

string[] files = { "Book1.xlsx", "Book2.xlsx", "Book3.xlsx" };

var destination = new ExcelFile();
var destinationSheet = destination.Worksheets.Add("Sheets");

int lastColumn = 0;
foreach (string file in files)
{
    var source = ExcelFile.Load(file);
    foreach (var sourceSheet in source.Worksheets)
    {
        var range = sourceSheet.GetUsedCellRange(true);
        int startRow = destinationSheet.Rows.Count;
        range.CopyTo(destinationSheet, startRow, 0);

        for (int r = 0; r < range.Height; r++)
            destinationSheet.Rows[r + startRow].Height = sourceSheet.Rows[r].Height;

        for (; lastColumn < range.Width; lastColumn++)
            destinationSheet.Columns[lastColumn].Width = sourceSheet.Columns[lastColumn].Width;
    }
}

destination.Save("Merged Output.xlsx");

如果需要，你也可以用这个答案来复制图片。

您也可以使用相同的解决方案来复制形状和图表，它们都具有复制后需要调整的位置属性。