Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > Access数据库-窗体/数据页

创建基于模板的Word文档

时 间:2016-02-23 08:47:41
作 者:杨雪   ID:42182  城市:南京
摘 要: Access 与Word之间的数据读写:Add 方法,Path 属性
正 文:

    通过Access创建基于指定模板的Word文档,需要在为Word应用程序创建文档时,使用模板的地址来指定创建文档基于的模板,其具体的语法格式如下所示:


 [应用程序名].Documents.Add([模板地址])


   模板的地址可以直接通过文本字符串来指定,地址的指定常见的形式有俩种,绝对地址和相对地址。

   本例通过CurrentProject对象的Path属性来得到当前数据库文件的地址,然后通过该地址来得到Word模板的地址,其具体的语法格式如下所示:


 CurrenntProject.Path & "\[模板名].dotx"

本例中使用的是Word 2010,模板文件的后缀为“.dotx”。如果使用的Word 2003以及更早版本,需要使用后缀为“.dot”的模板文件。

图片:

 


码:

 

 '创建一个基于模板的Word文档

Private Sub cmd_word_Click()

    '使用New关键字创建Word应用程序

Dim wordApp As New Word.Application

Dim wordDoc As Word.Document

Dim str As String

    '获取当前文件的路径

    str = CurrentProject.Path & "\示例模版.dotx"

    '创建基于指定地址的模板的Word文档

Set wordDoc = wordApp.Documents.Add(str, False)

    '设置Word应用程序可视状态为True

wordApp.Visible = True

Set wordApp = Nothing

Set wordDoc = Nothing

End Sub

 

附   件:

示例下载



Access软件网官方交流QQ群 (群号:54525238)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助