*** adoCN.Execute sSQL ***

Next lRow

adoCN.Close

设置adoCN = Nothing


'On Error GoTo 0

" ***adoCN.Execute sSQL*** Next lRow adoCN.Close Set adoCN = Nothing 'On Error GoTo 0

错误：adoCN.Execute sSQL

error at : adoCN.Execute sSQL

看看这里：使用VBA进行Excel-SQL Server导入 - 导出 [ ^ ]

它可能很有帮助;）

Have a look here: Excel-SQL Server Import-Export using VBA[^]
It might be helpful ;)