多个工作表合并汇总之VBA方法(共2页).doc
( 4.5 )《多个工作表合并汇总之VBA方法(共2页).doc》由会员分享，可在线阅读，更多相关《多个工作表合并汇总之VBA方法(共2页).doc（2页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。
精选优质文档-倾情为你奉上多个工作表合并汇总（VBA方法）傻瓜教程1、打开要汇总工作表的excel文件；2、按Alt+F11，打开VBA编辑器，如图；3、在左上角的“工程”中，选中“ThisWorkbook”，双击打开，如图；4、复制以下代码在空白处：Sub 合并()Dim m As IntegerDim n As IntegerDim o As IntegerFor m = 2 To 30 此处的30需要根据你实际的工作表数填写n = Sheets(m).a65536.End(xlUp).Rowo = Sheets(1).a65536.End(xlUp).RowSheets(m).SelectRange(a1, z & n).SelectRange(a & n).ActivateSelection.CopySheets(1).SelectRange(a & o + 1).SelectActiveSheet.PasteNextEnd Sub5、全选代码，点击运行图标，如图：6、注意事项：1）汇总好的数据在第一张工作表中；2）“运行”图标每点击一次，就进行一次汇总，切勿点击多次；3）汇总后的数据不能通过“Ctrl+Z”来撤销操作，事先须做好数据备份。专心-专注-专业
- 配套讲稿：
如PPT文件的首页显示word图标，表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制：
部分文档作品中含有的国旗、国徽等图片，仅作为作品整体效果示例展示，禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词：
- 工作 合并 汇总 VBA 方法
淘文阁 - 分享文档赚钱的网站所有资源均是用户自行上传分享，仅供网友学习交流，未经上传用户书面授权，请勿作他用。
限制150内