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