容器意外退出。退出代码：0xC00000CC

Question

我正在尝试打开Excel工作簿，刷新工作簿中的数据连接，然后保存并关闭工作簿。

这对于通过旧版向导（通过数据连接向导）完成的数据连接工作正常，但是对于尝试使用VBA自动刷新时使用Power Query的任何数据连接，我总是会收到错误消息“容器意外退出。退出代码：0xC00000CC。”

我尝试了多种刷新查询的方法，下面是最新的VBA代码。

我还使用了debug.print con.name，可以看到所有连接，并可以确认导致错误发生的连接是以“ Query-”开头的连接。

For Each con In objWorkbook1.Connections
If Left(con.Name, 8) = "Query - " Then
Cname = con.Name
With objWorkbook1.Connections(Cname).OLEDBConnection
.BackgroundQuery = False
.Refresh
End With
End If
Next

用于刷新数据连接的预期结果，与在Excel中手动刷新的结果相同（发生这种情况时不会出现错误）。

错误消息： 容器意外退出。退出代码：0xC00000CC。