在VBA中编写Flexable SQL SELECT查询

Question

一般的想法是创建一个VBA脚本，为没有SQL经验的用户有效地编写SQL SELECT查询。它接受他们已经熟悉的数据库。最终目标是允许用户：

1. 选择他们想要查看的列。
2. 对它们进行简单限制（日期范围，特定部件号）
3. 按照他们的意愿订购此列表。

我已经写过（在VBA中）一个脚本来执行此操作，但我还有一个问题。我无法直接在VBA中执行SELECT查询。我也无法找到有关如何将完成的查询从VBA导出回Access数据库的任何信息。我考虑过写一个文本文件，然后从所述文本文件读取Access，使用宏，并导入查询，但看起来Access似乎不支持这样的功能..

非常感谢任何帮助。

Answer 1

Dim sql_ as String
    sql_ = "SELECT * FROM Table"

DoCmd.RunSQL sql_


Dim sql_ as String
    sql_ = "UPDATE Table SET Field = 'ABC'"

CurrentDb.Execute sql_, dbFailOnError

Answer 2

以下是我自己解决这个问题的方法：

1. 编写VBA以构建SQL字符串（您已完成）
2. 创建与Access数据库的数据连接（数据＆gt;获取外部数据＆gt;来自Access）
3. 使用VBA更改数据连接属性中的命令文本，然后刷新。

这应该使您能够动态构建SQL，查询数据库并将结果返回到表中的Excel。

希望有所帮助！