### 使用VBA或Python合并多个Excel工作簿的最后一行数据 #### VBA方法 通过VBA脚本可以实现将指定文件夹内的所有Excel工作簿的最后一行数据提取并汇总到一个新的Excel文件中。以下是具体的代码示例： ```vba Sub MergeLastRows() Dim wb As Workbook, ws As Worksheet Dim folderPath As String, fileName As String Dim targetWB As Workbook, targetWS As Worksheet Dim lastRowTarget As Long, lastColSource As Long ' 设置目标工作簿和工作表 Set targetWB = Workbooks.Add Set targetWS = targetWB.Sheets(1) ' 获取文件夹路径 With Application.FileDialog(msoFileDialogFolderPicker) .Show If .SelectedItems.Count = 0 Then Exit Sub folderPath = .SelectedItems(1) & "\" End With ' 初始化变量 lastRowTarget = 1 ' 遍历文件夹中的所有Excel文件 fileName = Dir(folderPath & "*.xls*") Do While fileName <> "" If fileName <> ThisWorkbook.Name Then Set wb = Workbooks.Open(folderPath & fileName) For Each ws In wb.Worksheets lastColSource = ws.Cells(ws.Rows.Count, 1).End(xlUp).Column ' 复制最后一行数据到目标工作表 ws.Rows(ws.Rows.Count).Copy Destination:=targetWS.Rows(lastRowTarget) ' 更新目标工作表的行号 lastRowTarget = lastRowTarget + 1 Next ws wb.Close SaveChanges:=False End If fileName = Dir Loop MsgBox "完成！" End Sub ``` 此代码会弹出对话框让用户选择包含Excel文件的文件夹，然后遍历该文件夹中的每一个Excel文件，将其每一工作表的最后一行复制到新创建的工作簿中[^1]。 --- #### Python方法 使用Python可以通过`pandas`库高效地处理Excel文件的数据操作。以下是一个基于Python的解决方案： ```python import os import pandas as pd def merge_last_rows(dir_path): all_data = [] for file_name in os.listdir(dir_path): if file_name.endswith('.xlsx') or file_name.endswith('.xls'): file_path = os.path.join(dir_path, file_name) excel_file = pd.ExcelFile(file_path) for sheet_name in excel_file.sheet_names: df = excel_file.parse(sheet_name) if not df.empty: last_row = df.iloc[-1:] # 提取最后一行 all_data.append(last_row) if all_data: merged_df = pd.concat(all_data, ignore_index=True) output_path = os.path.join(dir_path, "Merged_Last_Rows.xlsx") merged_df.to_excel(output_path, index=False) print(f"已生成汇总文件：{output_path}") else: print("未找到任何有效数据") # 调用函数 merge_last_rows(r"D:\某文件夹") ``` 上述代码定义了一个名为`merge_last_rows`的函数，用于从指定目录下的所有Excel文件中提取每个工作表的最后一行，并将这些数据存储在一个新的Excel文件中[^2]。 --- ### 总结 无论是使用VBA还是Python，都可以有效地解决将多个Excel工作簿的最后一行数据汇总至新文件的问题。两种方式各有优劣： - **VBA**适合于熟悉Microsoft Office环境且不需要频繁修改逻辑的情况。 - **Python**更适合批量处理大量文件以及需要灵活扩展功能的情形。 ---