多个工作表数据合并到一个工作表

上传人:艾力 文档编号:33784652 上传时间:2018-02-17 格式:DOC 页数:5 大小:924KB
返回 下载 相关 举报
多个工作表数据合并到一个工作表_第1页
第1页 / 共5页
多个工作表数据合并到一个工作表_第2页
第2页 / 共5页
多个工作表数据合并到一个工作表_第3页
第3页 / 共5页
多个工作表数据合并到一个工作表_第4页
第4页 / 共5页
多个工作表数据合并到一个工作表_第5页
第5页 / 共5页
亲,该文档总共5页,全部预览完了,如果喜欢就下载吧!
资源描述

《多个工作表数据合并到一个工作表》由会员分享,可在线阅读,更多相关《多个工作表数据合并到一个工作表(5页珍藏版)》请在金锄头文库上搜索。

1、如何将多个工作表的数据汇总到一个工作表1、一个工作簿里面有多个工作表,各工作表之间的字段是一致的,但数据不一致。由于工作需要,需要将各个工作表的数据汇总到一个表格里面做汇总分析,数据少、工作表数目不多的时候,CTRL+C 后 CTRL+V 逐个复制粘贴是可以的,但数据量大、工作表数据多的时候,则可以用宏进行快速处理;2、从上图中,后面的 5 个工作表,里面是源数据。 “合并报表”这个表,则是要将后面 5 个表格的数据汇总的表格,其内容为空。3、方法:使用宏快速汇总(1)录制宏首先,点击文件菜单的“工具”菜单,选择“宏”“宏”出现以下的宏界面,在“宏名”中按照自己喜好录入一个名称,这里录入“合并

2、工作表”的名称, “位置”是指该宏可以在那个 EXCEL 工作簿中使用,这里选择“当前工作簿” 。然后点击“创建” 。出现以下的宏录入界面在“Sub 合并工作表() ”下面,将以下的字符复制粘贴过去Dim m As IntegerDim n As IntegerDim o As IntegerFor m = 2 To 6n = Sheets(m).a65536.End(xlUp).Rowo = Sheets(1).a65536.End(xlUp).RowSheets(m).SelectRange(a1, z & n).SelectRange(a & n).ActivateSelection.C

3、opySheets(1).SelectRange(a & o + 1).SelectActiveSheet.PasteNext特别注意这一段字符“For m = 2 To 6”,由于要汇总的数据的工作表有 5 个,加上“合并报表”这个工作表本身,一共是 6 个工作表,因此“For m = 2 To 6”中选择输入 6,如果后面要汇总的数据工作表有 3 个,则是录入 4,如果有 12 个,则是录入 13,依次类推。然后,点击“文件”菜单,选择“关闭并返回到 Micrlsoft Excel”。宏至此录入完毕。(2)使用已录制好的宏“合并工作表” ,进行工作表的数据汇总。首先,在“合并报表”中,点击点击文件菜单的“工具”菜单,选择“宏”“宏”出现宏界面,点击选择“合并工作表” ,然后点击“执行” 。就能达到汇总的效果。要注意,为避免出错,最好检查以下汇总后的报表中有数据的行数,是否等于后面各个报表有数据的行数总和。另外要注意,已经使用宏的报表,在保存时,会出现以下提示,点击确定即可。

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 行业资料 > 其它行业文档

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号