欢迎来到天天文库
浏览记录
ID:56049403
大小:67.50 KB
页数:2页
时间:2020-06-19
《如何将多个电子表格中的内容快速合并到一个工作表中.doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、如何将多个电子表格中的内容快速合并到一个工作表中?是excel么?第一步:打开你的工作簿,创建一个空表工作表(sheet1的位置)第二步:工具菜单-选项-安全性-宏安全性-设置成“中”等第三步:工具菜单-宏-宏-宏名-输入个名字--点创建第四步:弹出来一个框框【在“Sub合并工作表()”下面,将以下的字符复制粘贴过去】DimmAsIntegerDimnAsIntegerDimoAsIntegerForm=2To6n=Sheets(m).[a65536].End(xlUp).Rowo=Sheets(1).[a65536].End(
2、xlUp).RowSheets(m).SelectRange("a1","z"&n).SelectRange("a"&n).ActivateSelection.CopySheets(1).SelectRange("a"&o+1).SelectActiveSheet.PasteNext第五步:注意:Form=2To6如果你有5个工作表你就Form=2To6如果有7个就Form=2To8如果有8个就Form=2To9以此类推第六步:打开你之前创建的那个工作表,sheet1.第七步:工具菜单,选择“宏”-“宏”点击执行~就ok啦~
此文档下载收益归作者所有