VBA | 放大招,快速完成excel工作表的拆分与合并!

作者: 罂粟姐姐 | 来源:发表于2016-11-10 13:02 被阅读1764次

    曾经有一个问题困扰了姐姐很长很长时间,那就是如何快速的将一个Excel汇总表拆分成多个工作表!

    例如:集团公司下设18个分公司,也就意味着每次我需要“新建-筛选-复制-粘贴”18次,等完成所有的工作后,至少半个小时就过去了。

    原始数据

    肯定有很多小伙伴儿到现在也还是复制粘贴、复制粘贴……一直循环。

    就像计算机小白一言不合就关机重启一样,Excel小白一言不合就是复制粘贴。

    今天姐姐放大招,教大家快速将Excel汇总表拆分成多个工作表的方法,绝对将你半个小时的工作量缩短至两分钟,不服且看。

    (1)将Excel汇总表拆分成多个工作薄

    步骤1:同时按下“Alt+F11”快捷键(上周教程已经为大家推送了Alt快捷键的十大用法)

    步骤2:【插入】-【模块】导入事先编好的拆分代码。

    步骤3:【运行】-【运行子过程】,等待左边18个分公司模块全部显示,完成操作。

    (2)将Excel多个工作簿拆分为多个工作表

    步骤1:同时按下“Alt+F11”快捷键(上周教程已经为大家推送了Alt快捷键的十大用法)

    步骤2:【插入】-【模块】导入事先编好的拆分代码。

    步骤3:【运行】-【运行子过程】,等待显示“文件已拆分完毕”,完成操作。

    有的小伙伴可能会问,不用excel VBA能否实现同样的效果呢?

    这个还真的很抱歉,目前为止姐姐也没有发现更好的办法哦,这个已经是最高效的了。

    但是如果你的数据比较简单,需要将汇总表里的每一行都拆分为一个工作簿,可以利用数据透视表来完成。

    (3)利用数据透视表完成单行拆分

    步骤1:插入数据透视表,将“分公司名称”字段放入“筛选”位置,其他字段依次放入“行”位置

    步骤2:【设计】-【分类汇总】-【不显示分类汇总】

    步骤3:【设计】-【报表布局】-【以表格形式显示】

    步骤4:【分析】-【选项】-【显示报表筛选页】-【确定】,完成操作。

    还有的小伙伴会问,如果本来就有18个分公司的成绩表,现在需要将18分公司的成绩表合并成一个,怎么做呢?

    (4)利用Excel VBA完成多个表格合并

    步骤1:新建汇总表。

    步骤2:【插入】-【模块】导入事先编好的合并代码。

    步骤3:【运行】-【运行子过程】,等待显示“合并完成”,完成操作。

    好啦,今天的教程就到这里了,不管用不用得上,至少可以知道Excel中有很多功能不是没有,而是我们根本就不知道。

    不想粘贴复制,那就跟着罂粟姐姐好好学习吧。

    拆分合并的代码可以在后台索取哦!

    相关文章

      网友评论

      本文标题:VBA | 放大招,快速完成excel工作表的拆分与合并!

      本文链接:https://www.haomeiwen.com/subject/bjtxpttx.html