强大的VBA技术

我们经常用VBA技术来处理表格中固定且繁琐的数据，载体仅仅局限于Excel表格。

其实在office家族的产品：word,excel,access,powerpoint……都是可以使用的VBA语言，也就是说office各个应用程序之间是可以互相访问的，只不过它们的对象模型不一样，excel采用workbooks，word中采用Documents。

今天我们就来介绍下，如何在Excel中利用VBA访问Word文档。

建立连接

要想利用Excel访问Word，首先要建立对Word的连接，这里的连接可以分为：前期绑定与后期绑定。

前期绑定

打开Visual Basic视图，依次点击【工具】-【引用】-【Microsoft Word16.0 Object Library】，这里的office版本是16版本的，所以选择Microsoft Word16.0 Object Library，如果其它版本，对应选择即可。如下图所示：

这样，即可完成对Word的连接。

测试：

在模块中输入以下代码，点击运行按钮，即可发现，当前文件夹内的test文档（Word）

蓝色字体为注释部分

明细代码展示如下：

Sub 前期绑定()Dim wdapp As Word.ApplicationDim wdoc As DocumentSet wdapp = New Word.ApplicationSet wdoc = wdapp.Documents.Open(ThisWorkbook.Path & "\test.docx")wdapp.Visible = TrueSet wdapp = NothingSet wdoc = NothingEnd Sub

这样，我们就可以通过Excel利用VBA直接访问Word了。

后期绑定

后期绑定直接输入一行代码即可：

Set wdap=createobject("word.application")

测试：

输入以下代码：

蓝色字体为注释部分

明细代码展示如下：

Sub 后期绑定()Dim wdapp As Object, wdoc As ObjectSet wdapp = CreateObject("Word.Application")Set wdoc = wdapp.Documents.Open(ThisWorkbook.Path & "\DEMO\test.docx")wdapp.Visible = TrueSet wdapp = NothingSet wdoc = NothingEnd Sub

小伙伴们可以尝试下，在当前工作簿目录下新建一个Word文档，并在Excel中输入以上代码，即可发现，Word已被打开！纸上得来终觉浅，绝知此事要躬行，一定要亲手尝试哦！

小结

今天我们就先说到这里，如果利用VBA访问Word，后续我们再继续介绍如果利用VBA技术去操作Word，提取数据之类的；

觉得有用的小伙伴，记得关注我哦，定期分享数据小技巧！