第1个回答 2021-12-23
我们本文要介绍的是如何使用VBA代码将Word文件的表格数据批量写入Excel中间，一起来看看吧！
举个例子，假如您有这样的一份Word文件，其中里面包含了很多表格数据，但是呢，目前的状况是急需将Word中的每个表格的数据复制到Excel中进行汇总处理，当然还有附加条件的是其中的每个表格分别自动新建Sheet保存，所以说这个工作量是非常大的呢？而且是重复性动作，所以我们可以使用VBA来完成这个事情。
首先我们的需要汇总的Word文档的源文件中间有3个表格，当然这个表格数量可以无限多个，本例暂时举例就3个，如下：
我们一起看看动画是怎么实现的吧！
如下所示为完成后的效果图，是不是看到Word和Excel的数据交换其实也是非常简单的，因为他们都是一家的产品，所以处理起来比较容易。
附上源代码截图，如果有想要的话，可以在下方留言获得，谢谢！
此次完成这个从Word到Excel的数据汇总的核心代码如下，首先利用循环'遍历文档中的每个表格，也是利用了集合对象的原理；然后将我们在word中找到的数据复制到Excel中间objTable.Range.Copy吗，然后写入数组，在汇总完成以后，在数组赋值到我们的表格中间，依次循环来完成这个数据的汇总工作。
虽然对我们大部分用户来说，都不会再我们Excel使用汇总Word文档中的表格数据，但是万一在哪一天你汇总数据的时候，就会发现是如此简单的，但是或许在你需要的时候，你在写某段程序的时候，你就会发现我原来可以利用这代码来完成这个。
如果有不明白的或者不懂的可以在下方留言，我们会一一解答的。
我是Excel教案，关注我持续分享更多的Excel技巧！