将Access Databse中突出显示的行的字段导出到Word文档

Question

我有一个access数据库，我想将字段从突出显示的一行导出到word文档，并将其发送给接收者。

在Access数据库中，我想导出以下字段:首字母(字符串)、HospNo (字符和数字字符串)、日期、注释(字符串)

我希望将这些字段从我选择的行导出到word文档c:\test.docx中，其中4个MERGEFIELD的书签分别标记为Inits、HosNumber、ScanDate诊断。

我认为MailMerge是解决方案，这就是为什么我在Word中使用Mergefiled。但我对VBA知之甚少，不知道从哪里开始。

我的个人电脑上有Office 2010。

这些资料是否足以解释这个问题呢？

Answer 1

从非常高的级别来看，您可能需要在VBA中创建一个记录集，该记录集只包含要导出的一条记录。然后，可以使用该记录集作为邮件合并的源。

我从来没有做过邮件合并，但这应该会让你开始：

Dim db as Database
Dim rec as Recordset

Set db = CurrentDB
Set rec = db.OpenRecordset("SELECT Initials, HospNo, [date], comment FROM MyTableName WHERE SomeFilterCriteria")

'Mailmerge based on "rec"

显然，您需要根据您的特定信息更改MyTableName和MyFilterCriteria，您没有给出表名或如何确定要邮件合并的数据记录。

或者您可以构建一个查询，从查询中设置mailmerge，然后在指向表单的查询中添加筛选器。在查询中的条件行(如果在Design中打开它)，您将放置以下内容

[Forms]![MyFormName].[MyFieldName]

此外，如果您能够这样做，请更改日期字段名。单词"date“是一个保留词，这意味着您必须将它括在括号中，这样Access就不会认为它是内置命令。将字段名改为丑闻或其他东西，以避免未来的问题。

Answer 2

如果您已经在使用MailMerge，则只需选择Access中的行并在外部数据链接下使用Word Merge功能即可。如果您正在寻找一个更自动化的过程，我相信您将需要使用代码。