使用VBA从SSMS导入关联表数据到Excel报错如何解决

错误根源 #

报错是SQL字符串拼接时未预留必要空格导致的语法错误：拼接多段SQL时，前一段的末尾和后一段的开头直接相连，没有分隔空格，导致SQL解析器无法识别关键字。
拼接后的错误SQL片段示例：

FROM  [dbo].[NY_APPLICATION_HISTORY] ahLEFT JOIN [dbo].[NY_DEMOGRAPHIC_DATA] ddON dd.APPLICATION_VERSION_ID = ah.NEW_APPLICATION_ID WHERE APPLICATION_VERSION_ID in (xxx)ORDER BY ah.NEW_APPLICATION_ID

可以看到ah和LEFT JOIN、dd和ON、括号和ORDER BY都直接连在一起，完全不符合SQL语法规范。

修正后的代码 #

只需要调整SQL拼接逻辑，在每段末尾加空格即可：

strQuery = ""
strQuery = strQuery & "SELECT ah.NY_ID, ah.NEW_APPLICATION_ID, dd.GRAD_YEAR, dd.FIRST_NAME, dd.LAST_NAME, dd.MARITAL_STATUS, dd.NUMBER_DEPENDENTS, " _
& "dd.LRAP_PROGRAM, dd.CREATED_TIME " _
& "FROM  [dbo].[NY_APPLICATION_HISTORY] ah " _
& "LEFT JOIN [dbo].[NY_DEMOGRAPHIC_DATA] dd " _
& "ON dd.APPLICATION_VERSION_ID = ah.NEW_APPLICATION_ID " _
& "WHERE dd.APPLICATION_VERSION_ID in (" & VId & ") " _
& "ORDER BY ah.NEW_APPLICATION_ID"

额外优化：给WHERE条件里的APPLICATION_VERSION_ID加上表别名dd.，避免两个表存在同名字段时出现字段歧义报错。

排查小技巧 #

• 拼接完SQL后可以加一行Debug.Print strQuery，运行后在VBA编辑器的立即窗口就能看到完整的SQL语句，把语句复制到SSMS中直接执行，就能直观看到所有语法问题
• 如果涉及动态参数拼接，优先使用参数化查询，既可以避免SQL注入风险，也能减少字符串拼接导致的语法错误

内容的提问来源于stack exchange，提问作者bgado