网站首页 网站地图
网站首页 > 游戏秘籍 > 多个excel文件汇总

多个excel文件汇总

时间:2026-04-01 16:47:21

在 Excel 中,如果你有多个 Excel 文件(例如 .xlsx.xls 格式),想要将它们汇总到一个文件中,可以使用以下几种方法:

✅ 方法一:使用 Excel 的“合并工作簿”功能(适用于 Excel 2007 及以上版本)

步骤:

  1. 打开一个 Excel 文件(作为“源文件”)。
  2. 点击 “数据” > “从文件” > “从 Excel 工作簿”
  3. 选择你要合并的多个 Excel 文件(支持多个文件选择)。
  4. 点击 “确定”
  5. 选择“合并到一个工作簿”。
  6. 选择要合并到的目标工作簿(或新建一个)。
  7. 点击 “确定”,完成合并。

✅ 方法二:使用 VBA 宏(适合批量处理)

如果你需要自动化处理多个文件,可以使用 VBA 宏来批量合并。

示例 VBA 代码(合并多个 Excel 文件到一个文件):

Sub MergeExcelFiles()
    Dim SourceFiles As Variant
    Dim TargetFile As String
    Dim TargetWorkbook As Workbook
    Dim i As Integer

    ' 设置目标文件
    TargetFile = "C:\Your\Target\File.xlsx"  ' 修改为你的目标文件路径

    ' 获取所有源文件
    SourceFiles = Application.GetOpenFilename("Excel Files (*.xlsx, *.xls), *.xlsx, *.xls", FileFilter:="Excel Files (*.xlsx, *.xls), *.xlsx, *.xls")

    If SourceFiles <> "" Then
        ' 打开目标工作簿
        Set TargetWorkbook = Workbooks.Open(TargetFile)

        ' 遍历所有源文件
        For i = 0 To UBound(SourceFiles)
            Dim SourceFile As String
            SourceFile = SourceFiles(i)

            ' 打开源文件
            Dim SourceWorkbook As Workbook
            Set SourceWorkbook = Workbooks.Open(SourceFile)

            ' 将源文件的数据复制到目标工作簿
            SourceWorkbook.Activate
            TargetWorkbook.Activate

            ' 复制数据
            Dim SourceSheet As Worksheet
            Set SourceSheet = SourceWorkbook.Sheets(1)  ' 假设数据在第一个工作表

            Dim TargetSheet As Worksheet
            Set TargetSheet = TargetWorkbook.Sheets(1)  ' 假设目标数据在第一个工作表

            ' 复制数据
            SourceSheet.Range("A1").End(xlDown).Offset(1).Copy _
                TargetSheet.Range("A1").End(xlDown).Offset(1)

            ' 关闭源文件
            SourceWorkbook.Close SaveChanges:=False
        Next i

        ' 保存目标文件
        TargetWorkbook.Save
        TargetWorkbook.Close
    End If
End Sub

使用说明:

  • 将代码复制到 Excel 的 VBA 编辑器(按 Alt + F11)。
  • 插入一个模块(Insert > Module)。
  • 将代码粘贴进去。
  • 运行宏(运行 > 宏 > MergeExcelFiles)。

✅ 方法三:使用 Excel 的“数据”选项卡(适合简单合并)

  1. 打开一个 Excel 文件。
  2. 点击 “数据” > “从文件” > “从 Excel 工作簿”
  3. 选择你要合并的多个文件。
  4. 点击 “确定”,然后选择“合并到一个工作簿”。
  5. 选择目标工作簿,点击 “确定”

✅ 方法四:使用 Python(适合脚本化处理)

如果你熟悉 Python,可以使用 pandasopenpyxl 来批量读取多个 Excel 文件并合并。

示例(使用 pandas):

import pandas as pd

# 读取多个 Excel 文件
files = ["file1.xlsx", "file2.xlsx", "file3.xlsx"]
df_list = [pd.read_excel(f) for f in files]

# 合并到一个 DataFrame
merged_df = pd.concat(df_list, ignore_index=True)

# 保存到新文件
merged_df.to_excel("merged_file.xlsx", index=False)

✅ 方法五:使用 Excel 的“文件” > “打开” > “合并工作簿”(适用于 Excel 2007 及以下版本)

  1. 打开一个 Excel 文件。
  2. 点击 “文件” > “打开” > “合并工作簿”
  3. 选择多个 Excel 文件。
  4. 点击 “确定”,然后选择要合并到的目标工作簿。