EXCEL VBA 代码合并?

 利用VBA将数据区域不定的多个工作表数据快速合并到一个工作表方法。有需要的朋友可以跟着教程一起来学习!

 分别有工作表1、2、3数据区域如下图所示:

 输入如下代码:

 按ALT+F8打开宏对话框窗口,鼠标单击执行hbgzb宏。

 实现如图所示效果:

本段VBA代码由于将编辑过的区域作为源数据区域,顾无论该数据源有无数据,只要曾经编辑过皆做为源数据源,做拷贝处理。

以上就是利用VBA将excel多个工作表数据快速合并到一个工作表方法介绍,希望能对大家有所帮助!

利用VBA将excel多个工作表数据快速合并到一...

}

Excel表格的合并分为两种情况,一种是工作表合并、一种是工作簿合并

一个Excel表格叫做工作簿,每个工作簿中的Sheet叫做工作表

针对这两种情况的表格合并,今天我们来做个小结,看看都要哪些方法;不管你是高版本Excel还是低版本Excel,总有一种方法适合你。

当然这里不考虑极端的情况,如工作表/工作簿表头不一致、列数不同等,这里默认需要合并的工作表/工作簿表头都是一致的。

工作表的合并,顾名思义,合并同一工作簿下所有Sheets的数据,针对数据的多少,有不同的方法。

如果需要合并的数据比较少,这里可以利用剪贴板。

如何调出Excel剪贴板?它在开始功能区的最左边。

接着选中第一个sheet的内容,按CTRL+X快捷键,将sheet1内的所有内容剪切到剪贴板中;

同样的操作,将所有sheet的内容,全部CTRL+X剪切到剪贴板。

全部剪切完成,在新建的sheet中,点击左侧剪贴板中的“全部粘贴”按钮,完成工作表的合并。

不需要看懂代码,将代码复制粘贴到需要合并的工作簿中来,运行即可,表格合并完成。

Alt+F11两键,调出Visual Basic 界面,在左侧窗口中,右键选择“插入”—“模块”,将代码粘贴进去,点击运行按钮,完成数据表合并。

明细代码如下所示(直接复制可用):

依次点击【数据】—【获取数据】—【自文件】—【从工作簿】,选中需要合并的工作簿,点击【导入】。

之后进入到导航器界面,选中文件夹,点击【转换数据】。

进入Power Query编辑界面,取消勾选不需要的表名;

之后点击Data列扩展数据,点击确定,完成数据表的合并;

最后一步,点击左上角的“关闭并上载”即可将数据加载到Excel当中去。

剪贴板法适合少量表格的合并,VBA方法适合任意版本的Excel版本的数据合并,Power Query法只适合Excel2016及以上版本,如果其它版本想用这个功能,需要单独下载插件

工作簿的合并指合并在同一个文件下下所有的Excel工作簿。

首先我们需要将Excel表格文件另存为CSV文件,这一步可以通过VBA批量操作。

打开任意工作簿,调出Visual Basic 界面,输入以下代码(如何插入代码上面有介绍,这里不再赘述)

执行完毕后,将会将每一个表格生成一份csv文件。

之后保存文件,将文件后缀名修改为bat文件;

或者另存为,另存为界面需要注意两点:

第一点:文件名记得带.bat的后缀

第二点:保存类型选择【所有文件】

点击确定,就会出现一个可执行文件,类型为【windows批处理文件】。

双击此文件之后,当前文件夹内的所有csv文件全部被合并在一起。

此方法只适用于csv文件,不适用于xls/xlsx文件(也就是Excel表格),所以我们在第一步,将所有的Excel文件转化成csv格式

VBA运行方法都是一致的。

新建一个工作簿,打开,进入Visual Basic 界面,输入以下代码,点击运行,等待程序完成之后,工作簿完成合并。

依次点击【数据】—【获取数据】—【自文件】—【从文件夹】,选中需要合并的文件夹,点击【打开】,最后点击【转换数据】。

进入Power Query编辑界面,点击【Content】列,这里选择【参数1】,点击【确定】。

接着点击【Data】列扩展数据,点击【确定】,完成工作簿的合并,针对不需要的列可以右键删除,最后关闭并上载数据到Excel表格即可。

Windows 批处理适用于CSV文件,VBA适用于任意版本(如果Excel是2007以前版本,需要将代码中的XLSX修改成XLS)、Power Query适用于高版本Excel,各有所长

Excel工作表/工作簿的批量合并,分享给大家,希望对你有所帮助~

觉得内容还不错的话,给我点个“在看”呗

}

一起来学office,提高办公技能

一位粉丝朋友问了一个问题:

如何将不同工作薄中某工作表A1单元格数据都汇总在同一工作表中?

韩老师用合并几个个人简历工作薄来说明这个问题。

如下图,在一个文件中有四个个人简历工作薄:


每个工作薄中的数据如下图:



在同一文件夹下新建一工作薄,在VBA代码窗口中输入如下代码:


特别声明:以上内容(如有图片或视频亦包括在内)为自媒体平台“网易号”用户上传并发布,本平台仅提供信息存储服务。

}

我要回帖

更多关于 用vba合并表格 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信