Excel中使用sql语句时，where子句如何引用单元格的值

王南宁

各位大神，好
  我想请问在Excel中使用sql查询时，如何引用单元格的值，使之成为where字句后面的查询条件

如上图所示:where字句后面的字段名能否用单元格来表示

doitbest

这里不能引用变量，实现引用要用宏代码

王南宁

哦，好的，谢谢您

王南宁

但是如果能引用变量，那该多好啊

zhaogang1960

把这个查询过程变成VBA代码就很容易处理了，举例：

1. Sub 宏1() '2010
   
2.     Dim cnn As Object, SQL$
   
3.     Set cnn = CreateObject("ADODB.Connection")
   
4.     cnn.Open "Provider = Microsoft.ace.Oledb.12.0;Extended Properties =Excel 12.0;Data Source =" & ThisWorkbook.FullName
   
5.     SQL = "Select * from [数据源$]  where 品名='" & Sheets("查询表").[b3] & "'"
   
6.     [a2].CopyFromRecordset cnn.Execute(SQL)
   
7.     cnn.Close
   
8.     Set cnn = Nothing
   
9. End Sub
   

复制代码

张文洲

可以用sql参数查询来实现，可以查阅一下有关帖子

王南宁

zhaogang1960 发表于 2015-2-5 17:08
把这个查询过程变成VBA代码就很容易处理了，举例：

好的，谢谢

wk747

zhaogang1960 发表于 2015-2-5 17:08
把这个查询过程变成VBA代码就很容易处理了，举例：

您也帮忙看下我的疑问吧，大神，谢谢！Excel VBA中使用sql语句时，where子句如何引用单元格的值
http://club.excelhome.net/thread-1493752-1-1.html
(出处: ExcelHome技术论坛)