快捷導(dǎo)航

詳解C#如何在不同工作簿之間復(fù)制選定單元格區(qū)域

更新時間：2023年02月09日 15:53:05 作者：Carina-baby

處理Excel文檔時，我們經(jīng)常需要將數(shù)據(jù)整合到一個工作表以便于我們進(jìn)行管理或數(shù)據(jù)對比。本文將演示如何通過編程方式將選定的單元格區(qū)域從一個工作簿復(fù)制到另一個工作簿

在處理 Excel 文檔時，我們經(jīng)常需要將數(shù)據(jù)整合到一個工作表以便于我們進(jìn)行管理或數(shù)據(jù)對比。為了提高工作效率，我們可以在不同的工作簿之間復(fù)制選定的單元格區(qū)域或整個工作表。本文將演示如何通過編程方式將選定的單元格區(qū)域從一個工作簿復(fù)制到另一個工作簿。

程序環(huán)境

本次測試時，在程序中引入 Spire.XLS.dll 文件。

方法1：

將Free Spire.XLS for .NET?? 下載到本地，解壓，找到 BIN 文件夾下的 Spire.XLS.dll。然后在 Visual Studio 中打開“解決方案資源管理器”，鼠標(biāo)右鍵點(diǎn)擊“引用”，“添加引用”，將本地路徑 BIN 文件夾下的 dll 文件添加引用至程序。

方法2：:

通過?NuGet??安裝?？赏ㄟ^以下 2 種方法安裝：

1. 可以在 Visual Studio 中打開“解決方案資源管理器”，鼠標(biāo)右鍵點(diǎn)擊“引用”，“管理 NuGet 包”，然后搜索“Free Spire.XLS”，點(diǎn)擊“安裝”。等待程序安裝完成。

2. 將以下內(nèi)容復(fù)制到 PM 控制臺安裝。

Install-Package FreeSpire.XLS -Version 12.7

不同工作簿之間復(fù)制單元格范圍

創(chuàng)建一個Workbook對象以加載源 Excel 文檔。
分別使用 Workbook.Worksheets 屬性和 Worksheet.Range 屬性獲取源工作表和源單元格區(qū)域。
創(chuàng)建另一個Workbook對象以加載目標(biāo) Excel 文檔。
獲取目標(biāo)工作表和單元格區(qū)域。
使用 Worksheet.Copy(CellRange source, CellRange destRange) 將數(shù)據(jù)從源區(qū)域復(fù)制到目標(biāo)區(qū)域。
將源區(qū)域的列寬復(fù)制到目標(biāo)區(qū)域，以便數(shù)據(jù)可以在目標(biāo)工作簿中正常顯示。
使用 Workbook.SaveToFile() 方法將目標(biāo)工作簿保存到 Excel 文件。

完整代碼

C#

using Spire.Xls;

namespace CopyCellRange
{
    class Program
    {
        static void Main(string[] args)
        {
            //創(chuàng)建一個Workbook對象
            Workbook sourceBook = new Workbook();

            //加載源 Excel 文檔
            sourceBook.LoadFromFile("營業(yè)狀況表.xlsx");

            //獲取源工作表
            Worksheet sourceSheet = sourceBook.Worksheets[0];

            //獲取源單元格區(qū)域
            CellRange sourceRange = sourceSheet.Range["A1:G5"];

            //創(chuàng)建另一個Workbook對象
            Workbook destBook = new Workbook();

            //加載目標(biāo)工作簿
            destBook.LoadFromFile("目標(biāo)文檔.xlsx");

            //獲取目標(biāo)工作表
            Worksheet destSheet = destBook.Worksheets[0];

            //獲取單元格區(qū)域
            CellRange destRange = destSheet.Range["B2:H6"];

            //將數(shù)據(jù)從源范圍復(fù)制到目標(biāo)范圍
            sourceSheet.Copy(sourceRange, destRange);

            //循環(huán)遍歷源范圍中的列
            for (int i = 0; i < sourceRange.Columns.Length; i++)
            {
                //將列寬也從源范圍復(fù)制到目標(biāo)范圍
                destRange.Columns[i].ColumnWidth = sourceRange.Columns[i].ColumnWidth;
            }

            //將目標(biāo)工作簿保存到 Excel 文件
            destBook.SaveToFile("復(fù)制單元格范圍.xlsx");
        }
    }
}

VB.NET

Imports Spire.Xls

Namespace CopyCellRange
    Friend Class Program
        Private Shared Sub Main(ByVal args As String())
            '創(chuàng)建一個Workbook對象
            Dim sourceBook As Workbook = New Workbook()

            '加載源 Excel 文檔
            sourceBook.LoadFromFile("營業(yè)狀況表.xlsx")

            '獲取源工作表
            Dim sourceSheet As Worksheet = sourceBook.Worksheets(0)

            '獲取源單元格區(qū)域
            Dim sourceRange As CellRange = sourceSheet.Range("A1:G5")

            '創(chuàng)建另一個Workbook對象
            Dim destBook As Workbook = New Workbook()

            '加載目標(biāo)工作簿
            destBook.LoadFromFile("目標(biāo)文檔.xlsx")

            '獲取目標(biāo)工作表
            Dim destSheet As Worksheet = destBook.Worksheets(0)

            '獲取單元格區(qū)域
            Dim destRange As CellRange = destSheet.Range("B2:H6")

            '將數(shù)據(jù)從源范圍復(fù)制到目標(biāo)范圍
            sourceSheet.Copy(sourceRange, destRange)

            '循環(huán)遍歷源范圍中的列
            For i As Integer = 0 To sourceRange.Columns.Length - 1
                '將列寬也從源范圍復(fù)制到目標(biāo)范圍
                destRange.Columns(i).ColumnWidth = sourceRange.Columns(i).ColumnWidth
            Next

            '將目標(biāo)工作簿保存到 Excel 文件
            destBook.SaveToFile("復(fù)制單元格范圍.xlsx")
        End Sub
    End Class
End Namespace