合并多个excel文件

Excel | 合并多个excel文件

在Excel中合并多个Excel文件或工作表，可以采用多种方法，具体取决于你的具体需求和数据量。以下是一些常用的方法：

一、手动合并

‌适用场景‌：

• 适合表格数量和数据量不大的情况。

‌操作步骤‌：

• 打开所有需要合并的Excel文件，确保它们的格式一致（如列标题、数据类型等）。
• 在第一个Excel文件中选中需要合并的数据区域，使用快捷键Ctrl+C复制。
• 切换到目标Excel文件，选择要粘贴数据的起始单元格，按Ctrl+V进行粘贴。
• 重复上述步骤，直到所有文件的数据都被合并。
• 合并完成后，检查数据的重复项和格式不一致情况，进行清理和调整。

二、使用Excel内置功能

‌合并工作簿功能‌：

• 在一个新的Excel文件中，点击“数据”选项卡。
• 选择“获取数据”中的“合并查询”。
• 选择要合并的文件，然后按照提示进行操作，将数据合并到一个新工作表中。

‌数据透视表‌：

• 将所有需要合并的数据放在同一工作簿的不同工作表中。
• 插入数据透视表，通过数据透视表向导进行设置，实现多个数据源的数据汇总。

‌Power Query‌：

• 打开Excel，点击“数据”选项卡，然后选择“获取数据”。
• 选择“从文件”中的“从文件夹”选项。
• 选择包含需要合并文件的文件夹。
• Power Query会自动提取文件中的数据，并允许你进行清理与合并。
  
  
  
  

三、使用VBA宏

‌适用场景‌：

适合需要频繁合并大量Excel文件的情况。

‌操作步骤‌：

• 按Alt+F11打开VBA编辑器。
• 插入一个新的模块，粘贴以下代码（示例）：

Sub MergeWorkbooks()

Dim wb As Workbook

Dim ws As Worksheet

Dim masterWs As Worksheet

Dim lastRow As Long

Dim folderPath As String

Dim fileName As String

folderPath = “C:\你的文件夹路径” ’ 修改为你的文件夹路径

fileName = Dir(folderPath & “*.xlsx”)

Set masterWs = Workbooks.Add.Sheets(1)

Do While fileName <> “”

Set wb = Workbooks.Open(folderPath & fileName)

For Each ws In wb.Sheets

lastRow = masterWs.Cells(masterWs.Rows.Count, 1).End(xlUp).Row + 1

ws.UsedRange.Copy masterWs.Cells(lastRow, 1)

Next ws

wb.Close False

fileName = Dir

Loop

MsgBox “合并完成!”

End Sub

四、使用Python和Pandas库

‌适用场景‌：

适合有编程基础的人，可以根据具体需求进行高度定制。

‌操作步骤‌：

• 安装Python和pandas库。
• 编写Python脚本（示例）：

import pandas as pd

import os

def merge_excels(folder_path, output_file):

all_files = [os.path.join(folder_path, f) for f in os.listdir(folder_path) if f.endswith(‘.xlsx’)]

all_data = pd.DataFrame()

for file in all_files:

data = pd.read_excel(file)

all_data = pd.concat([all_data, data], ignore_index=True)

all_data.to_excel(output_file, index=False)

# 使用示例

merge_excels(‘your_folder_path’, ‘merged_output.xlsx’)
to_excel(output_file, index=False)

# 使用示例

merge_excels(‘your_folder_path’, ‘merged_output.xlsx’)