有没有办法让最终用户使用Access中的当前过滤器集作为Word mailmerge的数据源?

时间:2011-06-28 15:41:18

标签: ms-access vba ms-word mailmerge

我们的产品之一是Access数据库,其中包含一个列出数千个地址的表。我们的产品包括用户友好界面,用于搜索和过滤地址。它们显示在表单上,​​我们称之为frmAddress。

我们在frmAddress上包含一个Export to Excel按钮,该按钮获取当前过滤器集并将其导出到Excel。

要将过滤后的地址用作Word mailmerge的数据源,最终用户首先导出到Excel,然后使用Excel文件作为数据源。

但这相当漫长。有没有办法直接连接到Access并拔出地址(在frmAddress中设置的当前过滤器,而不是整个表)?如果无法直接完成任何接近的事情?

我能想到的最接近的事情是每次更改时保存当前过滤器集作为动态查询的CommandText,但在我看来,在Word 2003中,Access Queries(与Tables不同)不可靠mailmerge目的。

1 个答案:

答案 0 :(得分:1)

如果您在此处下载我的代码库: http://www.kallal.ca/msaccess/msaccess.html

(超级简单的单词合并)

然后,合并所需的代码是:

Dim strSql      as string

strSql = "select * from tblCustomers where " & me.Filter

MergeAllWord strSql