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

Question

如题所述

Answer 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!合并文件”宏。

Answer 2

右击分页-移动或复制工作表-然后选择移动到你要复制到的文件就完成了

Answer 3

要用VBA 解决，
讲清楚 要求 [email protected]

Answer 4

复制粘贴、插入页追问

几万个表格了