首页 > 解决方案 > VBA Excel 中的 SQL 语句

问题描述

我对 VBA Excel 中的 SQL 语句有疑问。我不能将 ORDER BY 与 GROUP BY 一起使用,我不明白为什么。如果我删除 ORDER BY,我不会收到错误消息。谁能帮我弄清楚我错在哪里?

非常感谢大家!!

这是我的代码:

Dim RS As New ADODB.Recordset
Dim sConn As String
Dim stmSQL As String

sConn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ActiveWorkbook.Path & "/OrigineDati.xlsx" & ";Extended Properties='Excel 12.0 Xml;HDR=YES'"

stmSQL = "SELECT COL5 FROM [DATABASE$] WHERE COL9 = 'PITTSBURGH' AND LEFT(COL5,2) = 'BA'" _
& "GROUP BY COL5" _
& "ORDER BY COL5 ASC"

Foglio1.Range("A2").CurrentRegion.ClearContents

RS.Open stmSQL, sConn, adOpenStatic, adLockReadOnly

Foglio1.Range("A2").CopyFromRecordset RS

RS.Close
Set RS = Nothing

标签: sqlexcelvba

解决方案


缺少空间?尝试

& " ORDER BY COL5 ASC"  'space before ORDER

推荐阅读