我正在寻找一种直接从word文档打开访问表的方法。所以有点像：
Sub nieuwsdm()
Dim pptapp As PowerPoint.Application
Dim ppt As PowerPoint.Presentation
Set pptapp = CreateObject("PowerPoint.Application")
Set ppt = pptapp.Presentations.Open("pres1.ppt")
然后使用访问文件。有人知道如何解决这个问题？
答案 0 :(得分：1)
可能你可以使用类似的东西：http://support.microsoft.com/kb/193716 如何使用Microsoft Access查询或表作为Word数据源 要将Microsoft Access查询或表用作Word数据源，请按照下列步骤操作：
1.如果要在Word邮件合并中使用Microsoft Access查询或表的结果作为数据源，请在“邮件合并帮助器”中（在“工具”菜单上单击“邮件合并”），单击“获取数据”，然后单击“获取数据”。单击“打开数据源”。 -要么- 如果要在Word文档中插入Microsoft Access查询或表的结果，请在“数据库”对话框中（在“数据库”工具栏上单击“插入数据库”），单击“获取数据”。
注意：要访问“数据库”工具栏，请在“视图”菜单上，指向“工具栏”，然后单击“数据库”。 2.在“打开数据源”对话框中，执行以下步骤：a。将“文件类型”框更改为“MS Access数据库”。 b。单击以选择您的Microsoft Access数据库文件。 c。单击以选中“选择方法”复选框。 d。单击“打开”。
3.在“确认数据源”对话框中，选择“通过DDE（* .mdb）进行MS Access数据库”，然后单击“确定”。
注意：如果“MS Access数据库通过DDE（* .mdb）”不可用，您将需要删除并重新安装Microsoft Access 97 for Windows。 4.在“Microsoft Access”对话框中，选择“查询”选项卡或“表”选项卡。 5.选择要使用的查询或表，然后单击“确定”。
注意：在“查询”选项卡上，默认情况下会选中“创建链接”复选框。此选项创建指向Microsoft Access数据库查询的链接。选中此复选框可始终检索任何列出的查询的最新版本。要忽略对原始查询说明的更改，请清除“链接到查询”复选框。 6.Word会将Microsoft Access查询或表的结果返回到Word文档。
如果您使用邮件合并，Word将提示您以下消息：
Word在主文档中找不到合并字段。选择“编辑主文档”按钮以将合并字段插入主文档。 单击编辑主文档并像往常一样继续邮件合并。 -要么- 如果要插入数据库信息，请在“数据库”对话框中单击“插入数据”。在“插入数据”对话框中，选择“全部”以将Microsoft Access查询的所有结果插入到Word文档中，或选择“从”并指定要将哪些记录插入到Word文档中。
注意：在“插入数据”对话框中，默认情况下未选中“将数据作为字段插入”。如果选中此选项，则会将数据作为字段插入表中。如果要在数据源发生更改时更新Word文档中的数据，请选中此复选框。