如何一次将数据正确粘贴到"测试"选项卡，开始单元格B3中？

Question

我有一个数据，比如说10行，每行有10个单元格（列），我可以一次粘贴所有数据吗？从C8单元格开始，很好地，每行。所以它将是
C8到C18-然后D8到D18。。。等

这就是我迄今为止使用的：

With ActiveSheet.QueryTables.Add(Connection:=Array(lConnection), Destination:=Range("A5"))
    .CommandType = xlCmdSql
    .CommandText = lRequete
    .RefreshStyle = xlOverwriteCells
    .AdjustColumnWidth = True
    .FieldNames = False
    .BackgroundQuery = False
    .Refresh
    .MaintainConnection = False
    .Delete
End With

它在.CommandType = xlCmdSql这一行出错，说：
过程的参数或调用不正确

有更好的解决方案吗？

更新：.刷新错误
错误"1004"
数据源不完整

Answer 1

连接字符串似乎有问题
已替换此
"Driver={SQL Server}; Server=X; Database=X; User Id=sa; Password=******;"
到此
"ODBC;SERVER=X;DSN=X;DATABASE=X;Trusted_Connection=Yes"