此宏解决的痛点:
多个表格字段相同,需要手工一个个打开之后复制合并到一个表上面的难题。
宏使用方式:
如下代码贴到VBE编辑器里后,不需任何修改即可直接使用。使用前确保要合并的Excel放置在同一个文件夹内,点击宏后,把存放Excel的文件夹的地址粘贴到弹出框即可。
示例:
1、待合并的EXCEL放在同一个文件夹内
![605f0b8c30fd67a384730cc97f347d85.png](https://img-blog.csdnimg.cn/img_convert/605f0b8c30fd67a384730cc97f347d85.png)
2、使用宏,粘贴路径地址
![ac9c3df8139b77b082f6f41c883b21e6.png](https://img-blog.csdnimg.cn/img_convert/ac9c3df8139b77b082f6f41c883b21e6.png)
3、大功告成
![4bd76c9bf8f6b027e08604fd319475f7.png](https://img-blog.csdnimg.cn/img_convert/4bd76c9bf8f6b027e08604fd319475f7.png)
如下为代码
Sub 合并指定文件夹的工作簿()
Dim MP, MN, AW, Wbn, wn
Dim Wb As Workbook