excel学习库

excel表格_excel函数公式大全_execl从入门到精通

VBA|Excel+Word双剑合璧系列1

强大的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.Application Dim wdoc As Document Set wdapp = New Word.Application Set wdoc = wdapp.Documents.Open(ThisWorkbook.Path & "\test.docx") wdapp.Visible = True Set wdapp = Nothing Set wdoc = Nothing End Sub 这样,我们就可以通过Excel利用VBA直接访问Word了。 后期绑定 后期绑定直飞输入一行代码即可: Set wdap=createobject("word.application") 测试: 输入以下代码:蓝色字体为注释部分明细代码展示如下: Sub 后期绑定() Dim wdapp As Object, wdoc As Object Set wdapp = CreateObject("Word.Application") Set wdoc = wdapp.Documents.Open(ThisWorkbook.Path & "\DEMO\test.docx") wdapp.Visible = True Set wdapp = Nothing Set wdoc = Nothing End Sub 小伙伴们可以尝试下,在当前工作簿目录下新建一个Word文档,并在Excel中输入以上代码,即可发现,Word已被打开!纸上得来终觉浅,绝知此事要躬行,一定要亲手尝试哦! 小结 今天我们就先说到这里,如果利用VBA访问Word,后续我们在继续介绍如果利用VBA技术去操作Word,提取数据之类的; 觉得有用的小伙伴,记得关注我哦,定期分享数据小技巧!

发表评论:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

«    2024年12月    »
1
2345678
9101112131415
16171819202122
23242526272829
3031
控制面板
您好,欢迎到访网站!
  查看权限
网站分类
搜索
最新留言
    文章归档
      友情链接