Excel 怎么快速把一个文件夹中的不同工作表合并为一个表

excel

是excel吗？ 来来来，按步骤整： 第一步：打开你的excel文件，加个空白Sheet（就是Sheet1那块儿） 第二步：点工具栏的工具菜单 → 选项 → 安全性 → 宏安全性 → 设成中 第三步：还是工具菜单 → 宏 → 宏 → 输入个宏的名字 → 点创建 第四步：这时候会弹出一个代码框，在Sub 合并工作表()下面，把下面这段代码复制粘贴进去

Dim m As Integer Dim n As Integer Dim o As Integer For m = 2 To 6 n = Sheets(m).End(xlUp).Row o = Sheets(1).End(xlUp).Row Sheets(m).Select Range(a1, z & n).Select Range(a & n).Activate Selection.Copy Sheets(1).Select Range(a & o + 1).Select ActiveSheet.Paste Next

第五步：注意一下哈，For m = 2 To 6 这个地方，代表你要合并第2到第6个工作表 如果你有7个表，就改成 For m = 2 To 8 8个表就写 For m = 2 To 9，懂的都懂~ 第六步：回到你新建的Sheet1页面 第七步：点工具菜单 → 宏 → 宏 → 选你刚刚建的那个宏 → 点执行 搞定收工！