82问答网 > 如何将若干多个EXCEL表格合并到一张EXCEl中的不同sheet页上？请大师指点

如何将若干多个EXCEL表格合并到一张EXCEl中的不同sheet页上？请大师指点

2025-03-21 07:32:07

推荐回答（1个）

回答1：

建一个宏－“个人宏工作簿”，内容如下：
Sub
合并文件()
Range("A1").Select
Range(Selection,
ActiveCell.SpecialCells(xlLastCell)).Select
Selection.Copy
Workbooks.Open
Filename:="E:\合表.xlsx"
Selection.Insert
Shift:=xlDown
Application.CutCopyMode
=
False
ActiveWorkbook.Save
ActiveWindow.Close
ActiveWorkbook.Save
ActiveWindow.Close
ActiveWorkbook.Save
Application.Run
"PERSONAL.XLSB!合并文件"
End
Sub
新建“E:\合表.xlsx”空白表。
打开所有需要合并的文件（可一批批进行），运行“PERSONAL.XLSB!合并文件”宏。