我们的产品之一是Access数据库,其中包括一个列出数千个地址的表。我们的产品包括一个用户友好的界面,用于搜索和过滤地址。这些显示在一个表单上,我们称之为frmAddress。
我们在frmAddress上包含一个"导出到Excel"按钮,该按钮获取当前筛选器集并将其导出到Excel。
要将筛选后的地址用作Word邮件合并的数据源,最终用户首先导出到Excel,然后使用Excel文件作为数据源。
但这是一个相当漫长的过程。有没有办法直接连接到Access并提取地址(frmAddress中设置的当前筛选器,而不是完整的表)?如果不能直接完成,还有什么可以接近的吗?
我能想到的最接近的事情是,每次更改时都将当前过滤器集保存为动态查询的CommandText,但在我看来,在Word 2003中,Access查询(与表不同)对于邮件合并来说并不可靠。
如果您在此处下载我的代码库:http://www.kallal.ca/msaccess/msaccess.html
(超级容易的单词合并)
然后,合并所需的代码是:
Dim strSql as string
strSql = "select * from tblCustomers where " & me.Filter
MergeAllWord strSql