Excel 运行时错误'；5'；运行录制的宏时，过程调用或参数无效

我使用Excel中的向导使用到数据库的现有连接（数据>现有连接>表）从SQL Server导入表

我在执行此操作时录制了一个宏，因为我的目标是重复此过程，并将多个表从数据库导入工作簿中的多个选项卡

当我尝试运行刚刚录制的宏时，我收到错误消息：

运行时错误“5”：过程调用或参数无效

Sub Macro1()

With ActiveSheet.ListObjects.Add(SourceType:=4, Source:=ActiveWorkbook. _
    Connections("MyServer MyDatabase Multiple Tables"), _
    Destination:=Range("$A$1")).TableObject
    .RowNumbers = False
    .PreserveFormatting = True
    .RefreshStyle = 1
    .AdjustColumnWidth = True
    .ListObject.DisplayName = "MyTable"
    .Refresh
End With

End Sub

---

1） 错误在哪一行？2） 我怀疑是因为您已经将一个表放入了

范围（“A1”）

中，如果不先删除现有的表，您就无法在其中放置另一个表。您是否正在尝试添加与现有ListObject同名的ListObject？感谢您的响应，我认为这与在连接中引用多个表有关，因为当我为每个表使用一个单独的连接时，它现在可以工作。有时候，你所需要的只是有人能提出一些想法！再次感谢